Details

Time bar (total: 28.1s)

analyze2.0s (7.2%)

Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
0%0%99.8%0.2%0%0%0%4
0%0%99.8%0.2%0%0%0%5
0%0%99.8%0.2%0%0%0%6
0%0%99.8%0.2%0%0%0%7
0%0%99.8%0.2%0%0%0%8
0%0%99.8%0.2%0%0%0%9
0%0%99.8%0.2%0%0%0%10
0.8%0.8%99%0.2%0%0%0%11
1.2%1.2%98.6%0.2%0%0%0%12
Compiler

Compiled 38 to 22 computations (42.1% saved)

sample4.2s (15%)

Results
1.6s6648×body256valid
956.0ms2810×body256infinite
735.0ms817×body1024valid
375.0ms781×body512valid
299.0ms485×body1024infinite
178.0ms395×body512infinite
15.0ms10×body2048valid
Bogosity

preprocess71.0ms (0.3%)

Algorithm
egg-herbie
Rules
1654×fma-def
1320×distribute-lft-in
1116×distribute-rgt-in
932×*-commutative
622×associate--r+
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0110517
1266517
2657517
31965517
46496517
055
155
Stop Event
unsound
node limit
Calls
Call 1
Inputs
0
1
2
3
4
Outputs
0
1
2
1
3
4
3
Call 2
Inputs
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(*.f64 lambda1 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 R lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 R lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(*.f64 lambda2 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 R) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 lambda1 R) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(*.f64 phi1 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 R phi2) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 R phi2) 2)))) (*.f64 (-.f64 R phi2) (-.f64 R phi2)))))
(*.f64 phi2 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 R) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 R) 2)))) (*.f64 (-.f64 phi1 R) (-.f64 phi1 R)))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 lambda2) (cos.f64 (/.f64 (+.f64 lambda1 phi2) 2))) (*.f64 (-.f64 phi1 lambda2) (cos.f64 (/.f64 (+.f64 lambda1 phi2) 2)))) (*.f64 (-.f64 lambda1 phi2) (-.f64 lambda1 phi2)))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi2 lambda2) (cos.f64 (/.f64 (+.f64 phi1 lambda1) 2))) (*.f64 (-.f64 phi2 lambda2) (cos.f64 (/.f64 (+.f64 phi1 lambda1) 2)))) (*.f64 (-.f64 phi1 lambda1) (-.f64 phi1 lambda1)))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 phi1) (cos.f64 (/.f64 (+.f64 lambda2 phi2) 2))) (*.f64 (-.f64 lambda1 phi1) (cos.f64 (/.f64 (+.f64 lambda2 phi2) 2)))) (*.f64 (-.f64 lambda2 phi2) (-.f64 lambda2 phi2)))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 phi2) (cos.f64 (/.f64 (+.f64 phi1 lambda2) 2))) (*.f64 (-.f64 lambda1 phi2) (cos.f64 (/.f64 (+.f64 phi1 lambda2) 2)))) (*.f64 (-.f64 phi1 lambda2) (-.f64 phi1 lambda2)))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) 2)))) (*.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)))))
Outputs
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
(*.f64 lambda1 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 R lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 R lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(*.f64 lambda1 (hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (-.f64 R lambda2)) (-.f64 phi1 phi2)))
(*.f64 lambda1 (hypot.f64 (-.f64 phi1 phi2) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (-.f64 R lambda2))))
(*.f64 lambda2 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 R) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 lambda1 R) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(*.f64 lambda2 (hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (-.f64 lambda1 R)) (-.f64 phi1 phi2)))
(*.f64 lambda2 (hypot.f64 (-.f64 phi1 phi2) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (-.f64 lambda1 R))))
(*.f64 phi1 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 R phi2) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 R phi2) 2)))) (*.f64 (-.f64 R phi2) (-.f64 R phi2)))))
(*.f64 phi1 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 R phi2) 2))) (-.f64 R phi2)))
(*.f64 phi2 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 R) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 R) 2)))) (*.f64 (-.f64 phi1 R) (-.f64 phi1 R)))))
(*.f64 phi2 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 R phi1) 2))) (-.f64 phi1 R)))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 lambda2) (cos.f64 (/.f64 (+.f64 lambda1 phi2) 2))) (*.f64 (-.f64 phi1 lambda2) (cos.f64 (/.f64 (+.f64 lambda1 phi2) 2)))) (*.f64 (-.f64 lambda1 phi2) (-.f64 lambda1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 phi1 lambda2) (cos.f64 (/.f64 (+.f64 lambda1 phi2) 2))) (-.f64 lambda1 phi2)))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi2 lambda2) (cos.f64 (/.f64 (+.f64 phi1 lambda1) 2))) (*.f64 (-.f64 phi2 lambda2) (cos.f64 (/.f64 (+.f64 phi1 lambda1) 2)))) (*.f64 (-.f64 phi1 lambda1) (-.f64 phi1 lambda1)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 phi2 lambda2) (cos.f64 (/.f64 (+.f64 lambda1 phi1) 2))) (-.f64 phi1 lambda1)))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 phi1) (cos.f64 (/.f64 (+.f64 lambda2 phi2) 2))) (*.f64 (-.f64 lambda1 phi1) (cos.f64 (/.f64 (+.f64 lambda2 phi2) 2)))) (*.f64 (-.f64 lambda2 phi2) (-.f64 lambda2 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 phi1) (cos.f64 (/.f64 (+.f64 lambda2 phi2) 2))) (-.f64 lambda2 phi2)))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 phi2) (cos.f64 (/.f64 (+.f64 phi1 lambda2) 2))) (*.f64 (-.f64 lambda1 phi2) (cos.f64 (/.f64 (+.f64 phi1 lambda2) 2)))) (*.f64 (-.f64 phi1 lambda2) (-.f64 phi1 lambda2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 phi2) (cos.f64 (/.f64 (+.f64 lambda2 phi1) 2))) (-.f64 phi1 lambda2)))
(*.f64 R (hypot.f64 (-.f64 phi1 lambda2) (*.f64 (-.f64 lambda1 phi2) (cos.f64 (/.f64 (+.f64 lambda2 phi1) 2)))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) 2)))) (*.f64 (-.f64 phi2 phi1) (-.f64 phi2 phi1)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
Symmetry

(sort lambda1 lambda2)

(sort phi1 phi2)

Compiler

Compiled 42 to 26 computations (38.1% saved)

simplify94.0ms (0.3%)

Algorithm
egg-herbie
Rules
1234×fma-def
1090×distribute-lft-out
940×distribute-lft-in
850×*-commutative
734×associate-+l-
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02047
13847
28647
324347
477947
5325647
6661147
7799147
Stop Event
node limit
Counts
1 → 2
Calls
Call 1
Inputs
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
Outputs
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))

eval1.0ms (0%)

Compiler

Compiled 53 to 27 computations (49.1% saved)

prune1.0ms (0%)

Pruning

1 alts after pruning (1 fresh and 0 done)

PrunedKeptTotal
New112
Fresh101
Picked000
Done000
Total213
Accurracy
92.9%
Counts
3 → 1
Alt Table
Click to see full alt table
StatusAccuracyProgram
92.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
Compiler

Compiled 21 to 14 computations (33.3% saved)

localize27.0ms (0.1%)

Local Accuracy

Found 3 expressions with local accuracy:

NewAccuracyProgram
99.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
99.7%
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))
94.9%
(cos.f64 (/.f64 (+.f64 phi1 phi2) 2))
Compiler

Compiled 71 to 29 computations (59.2% saved)

series33.0ms (0.1%)

Counts
3 → 132
Calls

33 calls:

TimeVariablePointExpression
4.0ms
lambda1
@0
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
4.0ms
phi2
@0
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
3.0ms
phi2
@-inf
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
2.0ms
phi2
@inf
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
2.0ms
phi1
@0
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))

rewrite1.7s (6%)

Algorithm
batch-egg-rewrite
Rules
980×associate-/r*
720×associate-/r/
632×associate-/l*
388×add-sqr-sqrt
380×*-un-lft-identity
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01793
136993
2488293
Stop Event
node limit
Counts
3 → 71
Calls
Call 1
Inputs
(cos.f64 (/.f64 (+.f64 phi1 phi2) 2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
Outputs
(((-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((*.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((sqrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((log.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)))
(((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (+.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3) (pow.f64 R 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (/.f64 (+.f64 phi1 phi2) 2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))) #f)))

simplify205.0ms (0.7%)

Algorithm
egg-herbie
Rules
1496×associate-*r*
996×associate-*l*
904×fma-def
826×*-commutative
590×times-frac
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
055115745
1171915095
Stop Event
node limit
Counts
203 → 267
Calls
Call 1
Inputs
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 (pow.f64 lambda1 3) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))))))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) (*.f64 lambda2 R)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))))
(*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 lambda2 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 3) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2)) lambda1)) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))))
(*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) R) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) (*.f64 R lambda1)) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) R) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R)
(+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) (*.f64 (pow.f64 phi1 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 phi1 3) (*.f64 R (-.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2))) (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) (*.f64 (pow.f64 phi1 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 phi1 R)
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2))) phi1)) (*.f64 phi1 R)))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2))) phi1)) (+.f64 (*.f64 phi1 R) (*.f64 1/2 (/.f64 (*.f64 R (*.f64 phi2 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)))) (pow.f64 phi1 2))))))
(*.f64 -1 (*.f64 phi1 R))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (*.f64 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi1 2))) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R)
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 R (pow.f64 phi2 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (*.f64 (pow.f64 phi2 3) (-.f64 (+.f64 (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 R (pow.f64 phi2 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R phi2)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2))) phi2))))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (+.f64 (*.f64 1/2 (/.f64 (*.f64 phi1 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2)))) (pow.f64 phi2 2))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2))) phi2)))))
(*.f64 -1 (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi2 2))) (+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2)))))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1)
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(*.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)
(pow.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) 1/3)
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(log.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1)
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (+.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1)
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2)
(pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3)
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2))
(log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))))
(cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3)))
(cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)))
(expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1))
(log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 1)
(pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1)
(pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2))
(log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3)))
(cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3) (pow.f64 R 3)))
(expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1))
(log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
Outputs
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))
(fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (cos.f64 (*.f64 1/2 phi2))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (pow.f64 phi1 3)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (pow.f64 phi1 3)) (fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 -1/2 phi2) (sin.f64 (*.f64 1/2 phi1))))
(fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 phi2 phi2))))
(+.f64 (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) -1/8)))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3)) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 phi2 phi2)))))
(+.f64 (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) -1/8))) (fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3)) (cos.f64 (*.f64 1/2 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (*.f64 -1/8 (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (fma.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 -1/8 (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))
(+.f64 (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 1/48 (pow.f64 phi1 3))) (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (*.f64 (*.f64 -1/2 phi2) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))))
(fma.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) (-.f64 lambda1 lambda2))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 phi2 (-.f64 lambda1 lambda2)))) (*.f64 phi2 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) -1/2))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2)))))))
(fma.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) (-.f64 lambda1 lambda2)))))))
(fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 phi2 3))) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 phi2 (-.f64 lambda1 lambda2)))) (*.f64 phi2 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) -1/2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) lambda1))) (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) lambda1))) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 (*.f64 R (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))))
(-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (*.f64 lambda1 lambda1)))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 (pow.f64 lambda1 3) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) lambda1))) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R (*.f64 1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 R (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) lambda2) (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (pow.f64 lambda1 3))))))))
(-.f64 (fma.f64 1/2 (fma.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (*.f64 lambda1 lambda1))) (*.f64 lambda2 (*.f64 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (pow.f64 lambda1 3)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3)))))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(fma.f64 -1 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R))
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2)) 2)) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 R lambda1)) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) (*.f64 lambda2 R)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 1/2 (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2)) 2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (*.f64 lambda2 R) (*.f64 lambda1 lambda1))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2)) 2)) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R))))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) R)) (/.f64 lambda2 (*.f64 lambda1 lambda1))) (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 R lambda1)) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(neg.f64 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(fma.f64 -1/2 (*.f64 (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) lambda1)) (fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(fma.f64 -1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 R lambda1)) (-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 lambda2 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1/2 (*.f64 (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) lambda1)) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 lambda2 R) (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (*.f64 (*.f64 lambda1 lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(fma.f64 -1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 R lambda1)) (fma.f64 -1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) R)) (/.f64 lambda2 (*.f64 lambda1 lambda1))) (-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) lambda1)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) lambda1)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (fma.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (*.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)) (*.f64 R (*.f64 lambda2 lambda2)))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(-.f64 (fma.f64 (*.f64 (*.f64 1/2 (*.f64 R (*.f64 lambda2 lambda2))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 3) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) lambda1)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)) (*.f64 (*.f64 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) lambda1) (pow.f64 lambda2 3)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (fma.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (*.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)) (*.f64 R (*.f64 lambda2 lambda2)))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(-.f64 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 (*.f64 (*.f64 (*.f64 R (pow.f64 lambda2 3)) lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3))))) (fma.f64 (*.f64 (*.f64 1/2 (*.f64 R (*.f64 lambda2 lambda2))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R) (fma.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 1/2 (*.f64 (/.f64 R lambda2) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) lambda2) (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2)) lambda1)) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R) (fma.f64 1/2 (*.f64 (/.f64 R (*.f64 lambda2 lambda2)) (/.f64 (*.f64 lambda1 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (fma.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 1/2 (*.f64 (/.f64 R lambda2) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (*.f64 lambda2 lambda2)) (/.f64 lambda1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) R))) (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) lambda2) (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (neg.f64 lambda2) (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(fma.f64 -1 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R))
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) R) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 -1/2 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)))
(-.f64 (fma.f64 -1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) lambda2) (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) (*.f64 R lambda1)) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) R) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 -1/2 (*.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 lambda2 lambda2)) (/.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (fma.f64 -1/2 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R))))
(-.f64 (fma.f64 -1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (*.f64 lambda2 lambda2)) (/.f64 lambda1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) R))) (fma.f64 -1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) lambda2) (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R)
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))))
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))) R (*.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 phi1 R))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))))))
(fma.f64 1/2 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (*.f64 (*.f64 phi1 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) (*.f64 (pow.f64 phi1 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(fma.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))) R (*.f64 1/2 (+.f64 (*.f64 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))) (*.f64 (-.f64 (+.f64 1 (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))))) 2)) (*.f64 (*.f64 phi1 phi1) R))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))) (+.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (*.f64 phi1 R)) (*.f64 (*.f64 phi1 phi1) (*.f64 R (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))) (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) 1/2)) 2))))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 phi1 3) (*.f64 R (-.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2))) (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) (*.f64 (pow.f64 phi1 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))) (*.f64 (*.f64 (pow.f64 phi1 3) R) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (*.f64 -1/2 (/.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) (-.f64 (+.f64 1 (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))))) 2)))))))) (fma.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))) R (*.f64 1/2 (+.f64 (*.f64 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))) (*.f64 (-.f64 (+.f64 1 (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))))) 2)) (*.f64 (*.f64 phi1 phi1) R)))))))
(fma.f64 1/2 (*.f64 (pow.f64 phi1 3) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi2)))) 1/6 (/.f64 (*.f64 -1/2 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2))) (/.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)) (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))) (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) 1/2)) 2)))))) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))) (+.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (*.f64 phi1 R)) (*.f64 (*.f64 phi1 phi1) (*.f64 R (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))) (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) 1/2)) 2))))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2))))))
(*.f64 phi1 R)
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(fma.f64 -1 (*.f64 phi2 R) (*.f64 phi1 R))
(-.f64 (*.f64 phi1 R) (*.f64 phi2 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2))) phi1)) (*.f64 phi1 R)))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 1/2 (/.f64 R (/.f64 phi1 (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (neg.f64 phi2) 2))))) (*.f64 phi1 R)))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 R phi1) (-.f64 (fma.f64 phi2 phi2 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi2 phi2))) (*.f64 phi1 R)) (*.f64 phi2 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2))) phi1)) (+.f64 (*.f64 phi1 R) (*.f64 1/2 (/.f64 (*.f64 R (*.f64 phi2 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)))) (pow.f64 phi1 2))))))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 1/2 (/.f64 R (/.f64 phi1 (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (neg.f64 phi2) 2))))) (fma.f64 phi1 R (/.f64 (*.f64 1/2 (*.f64 (*.f64 phi2 R) (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (neg.f64 phi2) 2))))) (*.f64 phi1 phi1)))))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 R phi1) (-.f64 (fma.f64 phi2 phi2 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi2 phi2))) (fma.f64 1/2 (*.f64 (/.f64 R (*.f64 phi1 phi1)) (*.f64 phi2 (-.f64 (fma.f64 phi2 phi2 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi2 phi2)))) (*.f64 phi1 R))) (*.f64 phi2 R))
(*.f64 -1 (*.f64 phi1 R))
(*.f64 (neg.f64 phi1) R)
(*.f64 phi1 (neg.f64 R))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(fma.f64 R phi2 (*.f64 (neg.f64 phi1) R))
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))))
(fma.f64 R phi2 (fma.f64 -1 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))) 2) (/.f64 phi1 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) R))))))
(fma.f64 phi2 R (-.f64 (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (*.f64 phi1 R)))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (*.f64 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi1 2))) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))))
(fma.f64 R phi2 (fma.f64 -1 (*.f64 phi1 R) (*.f64 -1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))) 2) (/.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi2 R) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))) 2) (/.f64 phi1 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) R)))))))
(fma.f64 phi2 R (fma.f64 -1/2 (+.f64 (/.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (/.f64 (*.f64 (*.f64 phi2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi1 phi1))) (*.f64 phi1 (neg.f64 R))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R)
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R))
(fma.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi1 -2)) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))
(fma.f64 (*.f64 1/2 (*.f64 R (*.f64 phi2 (-.f64 (*.f64 phi1 -2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 R (pow.f64 phi2 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(fma.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi1 -2)) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (*.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi1 -2))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 (*.f64 (*.f64 phi2 phi2) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))))))
(fma.f64 1/2 (*.f64 (*.f64 phi2 R) (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))))) (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) 1)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))) (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))))) 2)) (*.f64 (*.f64 phi2 phi2) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1))))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (*.f64 (pow.f64 phi2 3) (-.f64 (+.f64 (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 R (pow.f64 phi2 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))
(fma.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi1 -2)) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (*.f64 R (pow.f64 phi2 3)) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (pow.f64 (-.f64 lambda1 lambda2) 2)) 1/6) (*.f64 -1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi1 -2))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 (fma.f64 -1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))))) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (*.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi1 -2))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 (*.f64 (*.f64 phi2 phi2) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))))
(fma.f64 1/2 (*.f64 (*.f64 phi2 R) (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))))) (fma.f64 1/2 (*.f64 R (*.f64 (*.f64 (pow.f64 phi2 3) (fma.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) 1/6 (*.f64 (*.f64 -1/2 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) 1)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))) (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))))) 2))) (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))))) (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) 1)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))) (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))))) 2)) (*.f64 (*.f64 phi2 phi2) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1))))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))))))
(*.f64 R phi2)
(*.f64 phi2 R)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(fma.f64 R phi2 (*.f64 (neg.f64 phi1) R))
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2))) phi2))))
(fma.f64 -1 (*.f64 phi1 R) (fma.f64 R phi2 (*.f64 1/2 (/.f64 R (/.f64 phi2 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2)))))))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 R phi2) (-.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi1 phi1))) (*.f64 phi2 R)) (*.f64 phi1 R))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (+.f64 (*.f64 1/2 (/.f64 (*.f64 phi1 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2)))) (pow.f64 phi2 2))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2))) phi2)))))
(fma.f64 -1 (*.f64 phi1 R) (fma.f64 R phi2 (*.f64 1/2 (+.f64 (/.f64 phi1 (/.f64 (*.f64 phi2 phi2) (*.f64 R (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2))))) (/.f64 R (/.f64 phi2 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2))))))))
(-.f64 (fma.f64 1/2 (+.f64 (*.f64 (/.f64 R phi2) (-.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi1 phi1))) (*.f64 (*.f64 (/.f64 R phi2) (-.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi1 phi1))) (/.f64 phi1 phi2))) (*.f64 phi2 R)) (*.f64 phi1 R))
(*.f64 -1 (*.f64 R phi2))
(neg.f64 (*.f64 phi2 R))
(*.f64 phi2 (neg.f64 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(fma.f64 -1 (*.f64 phi2 R) (*.f64 phi1 R))
(-.f64 (*.f64 phi1 R) (*.f64 phi2 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2))))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 phi1 R (*.f64 -1/2 (/.f64 R (/.f64 phi2 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))) 2)))))))
(-.f64 (fma.f64 -1/2 (*.f64 (/.f64 R phi2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi1 R)) (*.f64 phi2 R))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi2 2))) (+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2)))))
(fma.f64 -1/2 (/.f64 phi1 (/.f64 (*.f64 phi2 phi2) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))) 2))))) (fma.f64 -1 (*.f64 phi2 R) (fma.f64 phi1 R (*.f64 -1/2 (/.f64 R (/.f64 phi2 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))) 2))))))))
(fma.f64 -1/2 (*.f64 (*.f64 (/.f64 R phi2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 phi1 phi2)) (-.f64 (fma.f64 -1/2 (*.f64 (/.f64 R phi2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi1 R)) (*.f64 phi2 R)))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) 1/3)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(fabs.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (+.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2))
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(fabs.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 1)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3) 1/3)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))) 2))
(fabs.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3) (pow.f64 R 3)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))

eval303.0ms (1.1%)

Compiler

Compiled 13087 to 7635 computations (41.7% saved)

prune167.0ms (0.6%)

Pruning

30 alts after pruning (30 fresh and 0 done)

PrunedKeptTotal
New23730267
Fresh000
Picked101
Done000
Total23830268
Accurracy
93.3%
Counts
268 → 30
Alt Table
Click to see full alt table
StatusAccuracyProgram
33.0%
(fma.f64 phi2 R (-.f64 (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (*.f64 phi1 R)))
19.6%
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3) 1/3)
91.0%
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
39.4%
(-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
12.9%
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
49.8%
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
20.2%
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
23.3%
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
8.0%
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)
9.3%
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
27.0%
(*.f64 (neg.f64 phi1) R)
26.5%
(*.f64 phi2 R)
20.2%
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
8.0%
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
92.2%
(*.f64 R (hypot.f64 (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3) (-.f64 phi1 phi2)))
92.8%
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
62.3%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (-.f64 phi1 phi2)))
92.6%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)) (-.f64 phi1 phi2)))
92.7%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1)) (-.f64 phi1 phi2)))
56.7%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (cos.f64 (*.f64 1/2 phi2))))) (-.f64 phi1 phi2)))
69.1%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))) (-.f64 phi1 phi2)))
73.1%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 -1/2 phi2) (sin.f64 (*.f64 1/2 phi1))))) (-.f64 phi1 phi2)))
92.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (-.f64 phi1 phi2)))
62.3%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (-.f64 phi1 phi2)))
81.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi2))) (-.f64 phi1 phi2)))
86.7%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
70.5%
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2)) (-.f64 phi1 phi2)))
46.5%
(*.f64 R (hypot.f64 (expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
49.8%
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
41.5%
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3))
Compiler

Compiled 1256 to 888 computations (29.3% saved)

localize54.0ms (0.2%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
99.7%
(*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
99.6%
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
99.5%
(log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
94.9%
(cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))
Compiler

Compiled 92 to 44 computations (52.2% saved)

series96.0ms (0.3%)

Counts
4 → 120
Calls

30 calls:

TimeVariablePointExpression
36.0ms
phi2
@-inf
(log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
30.0ms
phi1
@inf
(log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
14.0ms
phi1
@-inf
(log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
12.0ms
phi2
@inf
(log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
1.0ms
phi1
@0
(log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))

rewrite184.0ms (0.7%)

Algorithm
batch-egg-rewrite
Rules
1348×associate-*r/
1068×associate-*l/
1022×distribute-lft-in
314×add-sqr-sqrt
308×*-un-lft-identity
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01584
131484
2387484
Stop Event
node limit
Counts
4 → 147
Calls
Call 1
Inputs
(cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))
(log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
Outputs
(((+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 1 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 1 (-.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 -1 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 1 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1)) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 1 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) 1) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((sqrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((log.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((cbrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 1 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 (sqrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (sqrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (pow.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((sqrt.f64 (pow.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((log.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((cbrt.f64 (pow.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((expm1.f64 (log1p.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((exp.f64 (log.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((exp.f64 (*.f64 (log.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)))
(((+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 1 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 1 (-.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 -1 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 1 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1)) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 1 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) 1) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((sqrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((log.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((cbrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)))
(((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 lambda2) 1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (*.f64 (neg.f64 lambda2) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (*.f64 (-.f64 lambda1 lambda2) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1)) (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((+.f64 (*.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 1 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (+.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 lambda1 (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3))) (-.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (*.f64 lambda1 (neg.f64 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1)) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 1 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 1 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (*.f64 lambda1 (neg.f64 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #f)))

simplify240.0ms (0.9%)

Algorithm
egg-herbie
Rules
998×associate-*r*
894×associate-*l*
766×associate-/l*
590×associate-+r-
576×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
044310969
1120010665
2717310665
Stop Event
node limit
Counts
267 → 231
Calls
Call 1
Inputs
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (+.f64 1 (cos.f64 (*.f64 1/2 phi2))))) (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (+.f64 1 (cos.f64 (*.f64 1/2 phi2))))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2))) 2))) (*.f64 -1/4 (/.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 1 (cos.f64 (*.f64 1/2 phi2)))))))) (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (+.f64 1 (cos.f64 (*.f64 1/2 phi2))))) (+.f64 (*.f64 1/6 (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2))) 3))) (+.f64 (*.f64 1/8 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (+.f64 1 (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -3/8 (/.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2))) 2))))))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2))) 2))) (*.f64 -1/4 (/.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 1 (cos.f64 (*.f64 1/2 phi2)))))))) (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2)))))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (+.f64 1 (cos.f64 (*.f64 1/2 phi1))))) (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (+.f64 1 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1))) 2))) (*.f64 -1/4 (/.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 1 (cos.f64 (*.f64 1/2 phi1)))))))) (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (+.f64 1 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1))) 2))) (*.f64 -1/4 (/.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 1 (cos.f64 (*.f64 1/2 phi1)))))))) (+.f64 (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 1/6 (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1))) 3))) (+.f64 (*.f64 1/8 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 1 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 -3/8 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1))) 2))))) (pow.f64 phi2 3))))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))))
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 0)
(+.f64 1 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1))
(+.f64 1 (-.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(+.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) -1)
(+.f64 -1 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1)
(-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2) 2)
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(*.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (*.f64 1 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1)) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 1 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) 1) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)
(pow.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) 1/3)
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(log.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(-.f64 (exp.f64 (log1p.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1)
(*.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(*.f64 1 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (sqrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2))
(*.f64 (pow.f64 (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(pow.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(pow.f64 (sqrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)
(pow.f64 (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 3)
(pow.f64 (pow.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) 1/3)
(sqrt.f64 (pow.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(log.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(cbrt.f64 (pow.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3))
(expm1.f64 (log1p.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(exp.f64 (log.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(exp.f64 (*.f64 (log.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1))
(+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 0)
(+.f64 1 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1))
(+.f64 1 (-.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(+.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) -1)
(+.f64 -1 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1)
(-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2) 2)
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(*.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (*.f64 1 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1)) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 1 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) 1) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)
(pow.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) 1/3)
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(log.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))
(cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))
(exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 lambda2) 1 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (*.f64 (neg.f64 lambda2) 1)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (*.f64 (-.f64 lambda1 lambda2) -1))
(+.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1)) (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2))))
(+.f64 (*.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 1 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1)
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (+.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3))) (-.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (*.f64 lambda1 (neg.f64 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1)) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 1 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 1 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (*.f64 lambda1 (neg.f64 lambda2))))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1)
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2)
(pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3)
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2))
(log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))))
(cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3)))
(cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)))
(expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1))
(log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
Outputs
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))
(fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (cos.f64 (*.f64 1/2 phi2))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (pow.f64 phi1 3)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (pow.f64 phi1 3)) (fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 -1/2 phi2) (sin.f64 (*.f64 1/2 phi1))))
(fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 phi2 phi2))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 -1/2))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3)) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 phi2 phi2)))))
(+.f64 (fma.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 -1/2))) (fma.f64 (*.f64 1/48 (pow.f64 phi2 3)) (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2))))
(log1p.f64 (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (+.f64 1 (cos.f64 (*.f64 1/2 phi2))))) (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2)))))
(fma.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1)) (log1p.f64 (cos.f64 (*.f64 1/2 phi2))))
(fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (/.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1) phi1)) (log1p.f64 (cos.f64 (*.f64 1/2 phi2))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (+.f64 1 (cos.f64 (*.f64 1/2 phi2))))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2))) 2))) (*.f64 -1/4 (/.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 1 (cos.f64 (*.f64 1/2 phi2)))))))) (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1)) (fma.f64 1/2 (*.f64 (*.f64 phi1 phi1) (*.f64 -1/4 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1) 2)) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1))))) (log1p.f64 (cos.f64 (*.f64 1/2 phi2)))))
(fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (/.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1) phi1)) (fma.f64 1/2 (*.f64 -1/4 (*.f64 (+.f64 (*.f64 (tan.f64 (/.f64 phi2 4)) (tan.f64 (/.f64 phi2 4))) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1))) (*.f64 phi1 phi1))) (log1p.f64 (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (+.f64 1 (cos.f64 (*.f64 1/2 phi2))))) (+.f64 (*.f64 1/6 (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2))) 3))) (+.f64 (*.f64 1/8 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (+.f64 1 (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -3/8 (/.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2))) 2))))))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2))) 2))) (*.f64 -1/4 (/.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 1 (cos.f64 (*.f64 1/2 phi2)))))))) (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2)))))))
(fma.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1)) (fma.f64 1/6 (*.f64 (pow.f64 phi1 3) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (pow.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1) 3)) (fma.f64 1/8 (tan.f64 (/.f64 (*.f64 1/2 phi2) 2)) (/.f64 (*.f64 -3/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2)))) (pow.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1) 2))))) (fma.f64 1/2 (*.f64 (*.f64 phi1 phi1) (*.f64 -1/4 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1) 2)) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1))))) (log1p.f64 (cos.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (/.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1) phi1)) (fma.f64 1/6 (*.f64 (pow.f64 phi1 3) (fma.f64 -1/4 (*.f64 (*.f64 (tan.f64 (/.f64 phi2 4)) (tan.f64 (/.f64 phi2 4))) (tan.f64 (/.f64 phi2 4))) (fma.f64 -3/8 (*.f64 (/.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1)) (tan.f64 (/.f64 phi2 4))) (*.f64 1/8 (tan.f64 (/.f64 phi2 4)))))) (fma.f64 1/2 (*.f64 -1/4 (*.f64 (+.f64 (*.f64 (tan.f64 (/.f64 phi2 4)) (tan.f64 (/.f64 phi2 4))) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1))) (*.f64 phi1 phi1))) (log1p.f64 (cos.f64 (*.f64 1/2 phi2))))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1))))
(log1p.f64 (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (+.f64 1 (cos.f64 (*.f64 1/2 phi1))))) (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1)))))
(fma.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1)) (log1p.f64 (cos.f64 (*.f64 1/2 phi1))))
(fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (/.f64 (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1) phi2)) (log1p.f64 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (+.f64 1 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1))) 2))) (*.f64 -1/4 (/.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 1 (cos.f64 (*.f64 1/2 phi1)))))))) (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1))))))
(fma.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1)) (fma.f64 1/2 (*.f64 (*.f64 phi2 phi2) (*.f64 -1/4 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1) 2)) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1))))) (log1p.f64 (cos.f64 (*.f64 1/2 phi1)))))
(fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (/.f64 (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1) phi2)) (fma.f64 1/2 (*.f64 (*.f64 phi2 phi2) (*.f64 -1/4 (+.f64 (*.f64 (tan.f64 (/.f64 phi1 4)) (tan.f64 (/.f64 phi1 4))) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1))))) (log1p.f64 (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (+.f64 1 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1))) 2))) (*.f64 -1/4 (/.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 1 (cos.f64 (*.f64 1/2 phi1)))))))) (+.f64 (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 1/6 (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1))) 3))) (+.f64 (*.f64 1/8 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 1 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 -3/8 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1))) 2))))) (pow.f64 phi2 3))))))
(fma.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1)) (+.f64 (fma.f64 1/2 (*.f64 (*.f64 phi2 phi2) (*.f64 -1/4 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1) 2)) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1))))) (log1p.f64 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 1/6 (*.f64 (pow.f64 phi2 3) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (pow.f64 (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1) 3)) (fma.f64 1/8 (tan.f64 (/.f64 (*.f64 1/2 phi1) 2)) (/.f64 (*.f64 -3/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (pow.f64 (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1) 2))))))))
(fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (/.f64 (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1) phi2)) (fma.f64 1/2 (*.f64 (*.f64 phi2 phi2) (*.f64 -1/4 (+.f64 (*.f64 (tan.f64 (/.f64 phi1 4)) (tan.f64 (/.f64 phi1 4))) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1))))) (fma.f64 1/6 (*.f64 (pow.f64 phi2 3) (fma.f64 -1/4 (*.f64 (*.f64 (tan.f64 (/.f64 phi1 4)) (tan.f64 (/.f64 phi1 4))) (tan.f64 (/.f64 phi1 4))) (fma.f64 1/8 (tan.f64 (/.f64 phi1 4)) (/.f64 (*.f64 -3/8 (cos.f64 (*.f64 1/2 phi1))) (/.f64 (+.f64 (cos.f64 (*.f64 1/2 phi1)) 1) (tan.f64 (/.f64 phi1 4))))))) (log1p.f64 (cos.f64 (*.f64 1/2 phi1))))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))
(fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (cos.f64 (*.f64 1/2 phi2))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (pow.f64 phi1 3)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (pow.f64 phi1 3)) (fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 -1/2 phi2) (sin.f64 (*.f64 1/2 phi1))))
(fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 phi2 phi2))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 -1/2))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3)) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 phi2 phi2)))))
(+.f64 (fma.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 -1/2))) (fma.f64 (*.f64 1/48 (pow.f64 phi2 3)) (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 phi1)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (*.f64 -1/8 (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (fma.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 -1/8 (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))
(+.f64 (fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 1/48 (pow.f64 phi1 3))) (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (*.f64 -1/2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (-.f64 lambda1 lambda2))))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 (*.f64 phi2 phi2) (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 (*.f64 phi2 (-.f64 lambda1 lambda2))) -1/8))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2)))))))
(fma.f64 1/48 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3)) (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 (*.f64 phi2 phi2) (-.f64 lambda1 lambda2))))))
(fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 3) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 (*.f64 phi2 (-.f64 lambda1 lambda2))) -1/8)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 0)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(+.f64 1 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(+.f64 1 (-.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(+.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) -1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(+.f64 -1 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2) 2)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (*.f64 1 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1)) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 (*.f64 1 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) 1) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) 1/3)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(fabs.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(-.f64 (exp.f64 (log1p.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1)
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 1 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (sqrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (pow.f64 (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (sqrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (cbrt.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 3)
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (pow.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) 1/3)
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(sqrt.f64 (pow.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(sqrt.f64 (pow.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(fabs.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(log.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (pow.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(expm1.f64 (log1p.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (log.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (*.f64 (log.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1))
(log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 0)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(+.f64 1 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(+.f64 1 (-.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(+.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) -1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(+.f64 -1 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2) 2)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (*.f64 1 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1)) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 (*.f64 1 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) 1) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) 1/3)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(fabs.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 lambda2) 1 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 lambda2) lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (+.f64 (-.f64 lambda1 lambda2) (*.f64 0 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (+.f64 (-.f64 lambda1 lambda2) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (+.f64 (-.f64 lambda1 lambda2) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (*.f64 (neg.f64 lambda2) 1)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (*.f64 (-.f64 lambda1 lambda2) -1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1)) (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 1 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (+.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 lambda1 (neg.f64 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3))) (-.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (*.f64 lambda1 (neg.f64 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (neg.f64 (+.f64 lambda2 lambda1)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 1 (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 1 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1)) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1) (/.f64 (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 lambda1 lambda2))
(/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 1 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (*.f64 1 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (/.f64 (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (/.f64 (sqrt.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (/.f64 (cbrt.f64 (+.f64 lambda2 lambda1)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (+.f64 lambda2 lambda1))) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) 1) (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(/.f64 (*.f64 (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 3) 1) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (+.f64 1 (*.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1))))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1) (/.f64 (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (fma.f64 (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 (neg.f64 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (*.f64 (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (*.f64 lambda1 (neg.f64 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (neg.f64 (+.f64 lambda2 lambda1)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 1 (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 1 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (/.f64 (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (/.f64 (sqrt.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2))
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(fabs.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))

localize4.0ms (0%)

Compiler

Compiled 10 to 6 computations (40% saved)

localize17.0ms (0.1%)

Local Accuracy

Found 2 expressions with local accuracy:

NewAccuracyProgram
99.6%
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
94.9%
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
Compiler

Compiled 37 to 17 computations (54.1% saved)

series6.0ms (0%)

Counts
2 → 72
Calls

18 calls:

TimeVariablePointExpression
1.0ms
lambda2
@0
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
1.0ms
phi2
@0
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
0.0ms
phi2
@-inf
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
0.0ms
phi2
@inf
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
0.0ms
phi1
@-inf
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))

rewrite89.0ms (0.3%)

Algorithm
batch-egg-rewrite
Rules
1154×unswap-sqr
890×swap-sqr
656×associate-*r/
646×distribute-rgt-in
610×distribute-lft-in
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01346
127346
2349846
Stop Event
node limit
Counts
2 → 41
Calls
Call 1
Inputs
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
Outputs
(((+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (sin.f64 (*.f64 1/2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((*.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((*.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((pow.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((pow.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((log.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((cbrt.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((exp.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 R) lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (pow.f64 (*.f64 lambda2 R) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 lambda2 R) 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #f)))

simplify94.0ms (0.3%)

Algorithm
egg-herbie
Rules
1160×fma-def
1064×*-commutative
846×unswap-sqr
766×distribute-lft-neg-out
658×+-commutative
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
01813909
14663755
217723615
355943567
Stop Event
node limit
Counts
113 → 118
Calls
Call 1
Inputs
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1/2 (*.f64 lambda2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))
(+.f64 (*.f64 -1/8 (*.f64 lambda2 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1/2 (*.f64 lambda2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))))
(+.f64 (*.f64 1/48 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (*.f64 -1/8 (*.f64 lambda2 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1/2 (*.f64 lambda2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi2))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R)))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R)))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi2))))))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R)))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi2)))))) (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R)))))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 lambda2 R))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 lambda2 R))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 lambda2 R))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 lambda2 R))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (sin.f64 (*.f64 1/2 phi1))))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1)
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(*.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))
(*.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))))
(*.f64 (*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)
(pow.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) 1/3)
(sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))
(log.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(exp.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)))) 1)
(pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 1)
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))) 2)
(pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))) 3)
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 2))
(log.f64 (pow.f64 (pow.f64 (exp.f64 R) lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)))))
(cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 3))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (pow.f64 (*.f64 lambda2 R) 3)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 lambda2 R) 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)))
(expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))))
(exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))) 1))
(log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))))
Outputs
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 phi2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) -1/8))))
(fma.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi2 phi2)) 1) (cos.f64 (*.f64 1/2 phi1))))
(fma.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2) (*.f64 (+.f64 1 (*.f64 -1/8 (*.f64 phi2 phi2))) (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3)) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 phi2))))))
(+.f64 (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) -1/8))) (fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3)) (cos.f64 (*.f64 1/2 phi1))))
(fma.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 1/48 (pow.f64 phi2 3)) (fma.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi2 phi2)) 1) (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 (+.f64 1 (*.f64 -1/8 (*.f64 phi2 phi2))) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 1/48 (pow.f64 phi2 3)) (*.f64 -1/2 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))
(fma.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) -1/2)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (cos.f64 (*.f64 1/2 phi2))))
(fma.f64 (fma.f64 -1/8 (*.f64 phi1 phi1) 1) (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 phi1 -1/2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (pow.f64 phi1 3)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(fma.f64 -1/8 (*.f64 phi1 (*.f64 phi1 (cos.f64 (*.f64 1/2 phi2)))) (fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (pow.f64 phi1 3)) (fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (fma.f64 -1/8 (*.f64 phi1 phi1) 1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (+.f64 (*.f64 phi1 -1/2) (*.f64 1/48 (pow.f64 phi1 3)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R))
(+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1/2 (*.f64 lambda2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))
(fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (*.f64 -1/2 (*.f64 lambda2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) R))))
(fma.f64 -1/2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 lambda2 R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R)))
(*.f64 (*.f64 lambda2 R) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 -1/8 (*.f64 lambda2 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1/2 (*.f64 lambda2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))))
(fma.f64 -1/8 (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 phi2)) R)) (fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (*.f64 -1/2 (*.f64 lambda2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) R)))))
(fma.f64 -1/8 (*.f64 (*.f64 (*.f64 lambda2 R) (*.f64 phi2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (fma.f64 -1/2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 lambda2 R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R))))
(fma.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R))) (*.f64 (*.f64 lambda2 R) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi2 phi2)) 1) (cos.f64 (*.f64 1/2 phi1)))))
(*.f64 (*.f64 lambda2 R) (fma.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2) (*.f64 (+.f64 1 (*.f64 -1/8 (*.f64 phi2 phi2))) (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 1/48 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (*.f64 -1/8 (*.f64 lambda2 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1/2 (*.f64 lambda2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))))
(fma.f64 1/48 (*.f64 (*.f64 lambda2 R) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3))) (fma.f64 -1/8 (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 phi2)) R)) (fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (*.f64 -1/2 (*.f64 lambda2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) R))))))
(fma.f64 1/48 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3)) (*.f64 lambda2 R)) (fma.f64 -1/8 (*.f64 (*.f64 (*.f64 lambda2 R) (*.f64 phi2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (fma.f64 -1/2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 lambda2 R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R)))))
(+.f64 (*.f64 (*.f64 lambda2 R) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi2 phi2)) 1) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 (*.f64 -1/2 lambda2) (*.f64 phi2 R)) (*.f64 (*.f64 1/48 lambda2) (*.f64 (pow.f64 phi2 3) R)))))
(*.f64 (*.f64 lambda2 R) (+.f64 (*.f64 (+.f64 1 (*.f64 -1/8 (*.f64 phi2 phi2))) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 1/48 (pow.f64 phi2 3)) (*.f64 -1/2 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi2))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 lambda2 R))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R)))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi2)))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R))) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R)))
(fma.f64 -1/2 (*.f64 lambda2 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R) phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 lambda2 R)))
(*.f64 R (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda2) (*.f64 (*.f64 phi1 -1/2) (*.f64 (sin.f64 (*.f64 1/2 phi2)) lambda2))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R)))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi2))))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R))) (fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R) (*.f64 -1/8 (*.f64 (*.f64 (*.f64 phi1 phi1) lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) R)))))
(fma.f64 -1/2 (*.f64 lambda2 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R) phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 lambda2 R))))
(fma.f64 phi1 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 lambda2 R))) (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 lambda2 R)) (fma.f64 -1/8 (*.f64 phi1 phi1) 1)))
(*.f64 lambda2 (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R) (*.f64 phi1 -1/2)) (*.f64 (fma.f64 -1/8 (*.f64 phi1 phi1) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R)))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi2)))))) (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R)))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R))) (fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R) (fma.f64 -1/8 (*.f64 (*.f64 (*.f64 phi1 phi1) lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) R)) (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R)))))))
(+.f64 (fma.f64 -1/2 (*.f64 lambda2 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R) phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 lambda2 R)))) (*.f64 (*.f64 (pow.f64 phi1 3) lambda2) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R) 1/48)))
(fma.f64 (fma.f64 -1/8 (*.f64 phi1 phi1) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 lambda2 R)) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 lambda2 R)) (+.f64 (*.f64 1/48 (pow.f64 phi1 3)) (*.f64 phi1 -1/2))))
(*.f64 lambda2 (+.f64 (*.f64 (fma.f64 -1/8 (*.f64 phi1 phi1) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) R)) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R) (+.f64 (*.f64 phi1 -1/2) (*.f64 1/48 (pow.f64 phi1 3))))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 lambda2 R))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 lambda2 R))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 lambda2 R))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 lambda2 R))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (sin.f64 (*.f64 1/2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi2))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi2))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (sin.f64 (*.f64 1/2 phi2)))))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi2))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi2))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (sin.f64 (*.f64 1/2 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi1 phi2))))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (fma.f64 1/2 (cos.f64 (+.f64 phi1 phi2)) 1/2)))
(*.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi1 phi2))))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (fma.f64 1/2 (cos.f64 (+.f64 phi1 phi2)) 1/2)))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 (*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi1 phi2))))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (fma.f64 1/2 (cos.f64 (+.f64 phi1 phi2)) 1/2)))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi1 phi2))))))) (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi1 phi2))))))))
(*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cbrt.f64 (fma.f64 1/2 (cos.f64 (+.f64 phi1 phi2)) 1/2))))
(*.f64 (*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi1 phi2))))))) (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (sqrt.f64 (cbrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi1 phi2))))))))
(*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cbrt.f64 (fma.f64 1/2 (cos.f64 (+.f64 phi1 phi2)) 1/2))))
(pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(pow.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) 1/3)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))
(sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi1 phi2)))))
(sqrt.f64 (fma.f64 1/2 (cos.f64 (+.f64 phi1 phi2)) 1/2))
(log.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(exp.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)))) 1)
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 1)
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))) 2)
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))) 3)
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 3) 1/3)
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 2))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log.f64 (pow.f64 (pow.f64 (exp.f64 R) lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 3))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (pow.f64 (*.f64 lambda2 R) 3)))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 lambda2 R) 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))) 1))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))

localize29.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
99.8%
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
99.7%
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
99.6%
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
94.9%
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
Compiler

Compiled 77 to 36 computations (53.2% saved)

series9.0ms (0%)

Counts
2 → 84
Calls

21 calls:

TimeVariablePointExpression
2.0ms
lambda1
@0
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
1.0ms
R
@0
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
0.0ms
phi1
@-inf
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
0.0ms
phi2
@-inf
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
0.0ms
phi1
@inf
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))

rewrite137.0ms (0.5%)

Algorithm
batch-egg-rewrite
Rules
896×swap-sqr
658×associate-*r/
648×distribute-rgt-in
612×distribute-lft-in
516×associate-*l/
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01352
127352
2350052
Stop Event
node limit
Counts
2 → 30
Calls
Call 1
Inputs
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
Outputs
(((-.f64 (exp.f64 (log1p.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((sqrt.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log.f64 (pow.f64 (exp.f64 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (pow.f64 R 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((exp.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (pow.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((sqrt.f64 (pow.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 lambda1 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 lambda1 3) (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((exp.f64 (log.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)))

simplify89.0ms (0.3%)

Algorithm
egg-herbie
Rules
1522×fma-def
1354×associate-+l+
1308×associate-+r+
956×*-commutative
672×unswap-sqr
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
01723768
14513702
215113568
347763508
Stop Event
node limit
Counts
114 → 102
Calls
Call 1
Inputs
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) R)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (*.f64 -1/2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 1/48 (*.f64 R (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R)
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R)
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R)
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R)
(*.f64 R (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi2))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 R (cos.f64 (*.f64 1/2 phi2))))) (+.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi2))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 R (cos.f64 (*.f64 1/2 phi2))))) (+.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R))) (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) R))))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) R)
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) R)
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) R)
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) R)
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1)))) (+.f64 (*.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1)))) (+.f64 (*.f64 1/48 (*.f64 R (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1)))) (+.f64 (*.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (*.f64 R lambda1))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (*.f64 R lambda1))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (*.f64 R lambda1))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (*.f64 R lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1)))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1)))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1)))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 R lambda1))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 R lambda1))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 R lambda1))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 R lambda1))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1)
(pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(pow.f64 (sqrt.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)
(pow.f64 (cbrt.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3)
(pow.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(log.f64 (pow.f64 (exp.f64 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(cbrt.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (pow.f64 R 3)))
(expm1.f64 (log1p.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(exp.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(exp.f64 (*.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1))
(log1p.f64 (expm1.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)))) 1)
(pow.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) 1)
(pow.f64 (sqrt.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))) 2)
(pow.f64 (cbrt.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))) 3)
(pow.f64 (pow.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) 2))
(log.f64 (pow.f64 (pow.f64 (exp.f64 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)))))
(cbrt.f64 (pow.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) 3))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 lambda1 3)))
(cbrt.f64 (*.f64 (pow.f64 lambda1 3) (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))
(expm1.f64 (log1p.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))))
(exp.f64 (log.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))))
(exp.f64 (*.f64 (log.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))) 1))
(log1p.f64 (expm1.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))))
Outputs
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) R)
(*.f64 R (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (*.f64 -1/2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) R (*.f64 -1/2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))
(fma.f64 R (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) R))))
(*.f64 R (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) R (fma.f64 -1/2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 phi2))))))
(fma.f64 R (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) R)) (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 phi2)) (*.f64 R -1/8))))
(fma.f64 -1/2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 R (*.f64 (*.f64 phi2 phi2) (*.f64 R -1/8)))))
(fma.f64 R (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 R (*.f64 (*.f64 phi2 phi2) (*.f64 R -1/8)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 1/48 (*.f64 R (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) R (fma.f64 -1/2 (*.f64 R (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (fma.f64 1/48 (*.f64 R (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3))) (*.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 phi2)))))))
(fma.f64 R (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) R)) (fma.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 phi2))) (*.f64 R (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3)) 1/48)))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 R phi2)) (*.f64 (pow.f64 phi2 3) (*.f64 R 1/48)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 R (*.f64 (*.f64 phi2 phi2) (*.f64 R -1/8)))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) R)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi2))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R))))
(fma.f64 R (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (*.f64 R (sin.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/2 (*.f64 R (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))) (*.f64 R (cos.f64 (*.f64 1/2 phi2))))
(*.f64 R (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 phi1 -1/2))))
(*.f64 R (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 R (cos.f64 (*.f64 1/2 phi2))))) (+.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi2))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R)))))
(fma.f64 -1/8 (*.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi2))) (*.f64 phi1 phi1)) (fma.f64 R (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (*.f64 R (sin.f64 (*.f64 1/2 phi2)))))))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 R (cos.f64 (*.f64 1/2 phi2)))))
(fma.f64 (*.f64 R (sin.f64 (*.f64 1/2 phi2))) (*.f64 phi1 -1/2) (*.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi2))) (fma.f64 -1/8 (*.f64 phi1 phi1) 1)))
(*.f64 R (+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))) (*.f64 (fma.f64 -1/8 (*.f64 phi1 phi1) 1) (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 R (cos.f64 (*.f64 1/2 phi2))))) (+.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R))) (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) R))))))
(fma.f64 -1/8 (*.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi2))) (*.f64 phi1 phi1)) (fma.f64 R (cos.f64 (*.f64 1/2 phi2)) (fma.f64 -1/2 (*.f64 phi1 (*.f64 R (sin.f64 (*.f64 1/2 phi2)))) (*.f64 1/48 (*.f64 (*.f64 R (sin.f64 (*.f64 1/2 phi2))) (pow.f64 phi1 3))))))
(+.f64 (*.f64 (*.f64 R (sin.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 phi1 -1/2) (*.f64 1/48 (pow.f64 phi1 3)))) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 R (cos.f64 (*.f64 1/2 phi2)))))
(fma.f64 (*.f64 R (sin.f64 (*.f64 1/2 phi2))) (fma.f64 phi1 -1/2 (*.f64 1/48 (pow.f64 phi1 3))) (*.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi2))) (fma.f64 -1/8 (*.f64 phi1 phi1) 1)))
(*.f64 R (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (fma.f64 phi1 -1/2 (*.f64 1/48 (pow.f64 phi1 3)))) (*.f64 (fma.f64 -1/8 (*.f64 phi1 phi1) 1) (cos.f64 (*.f64 1/2 phi2)))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) R)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) R)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) R)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) R)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))
(fma.f64 -1/2 (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))
(fma.f64 -1/2 (*.f64 phi2 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1) R)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)))
(*.f64 lambda1 (*.f64 R (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1)))) (+.f64 (*.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))
(fma.f64 -1/2 (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1))) (fma.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) lambda1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))
(fma.f64 -1/2 (*.f64 phi2 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1) R)) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1) (*.f64 (*.f64 (*.f64 R -1/8) (*.f64 phi2 (*.f64 phi2 lambda1))) (cos.f64 (*.f64 1/2 phi1)))))
(fma.f64 R (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1))) (*.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1))) (+.f64 lambda1 (*.f64 -1/8 (*.f64 phi2 (*.f64 phi2 lambda1))))))
(*.f64 lambda1 (fma.f64 R (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 R (*.f64 (*.f64 phi2 phi2) (*.f64 R -1/8))))))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1)))) (+.f64 (*.f64 1/48 (*.f64 R (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1)))) (+.f64 (*.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))))
(fma.f64 -1/2 (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1))) (fma.f64 1/48 (*.f64 R (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1))) (fma.f64 -1/8 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) lambda1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))))
(fma.f64 -1/2 (*.f64 phi2 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1) R)) (fma.f64 1/48 (*.f64 R (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 3) lambda1))) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1) (*.f64 (*.f64 (*.f64 R -1/8) (*.f64 phi2 (*.f64 phi2 lambda1))) (cos.f64 (*.f64 1/2 phi1))))))
(+.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1))) (+.f64 lambda1 (*.f64 -1/8 (*.f64 phi2 (*.f64 phi2 lambda1))))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) lambda1) (+.f64 (*.f64 phi2 (*.f64 R -1/2)) (*.f64 (pow.f64 phi2 3) (*.f64 R 1/48)))))
(*.f64 lambda1 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 R phi2)) (*.f64 (pow.f64 phi2 3) (*.f64 R 1/48)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 R (*.f64 (*.f64 phi2 phi2) (*.f64 R -1/8))))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (*.f64 R lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (*.f64 R lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (*.f64 R lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (*.f64 R lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1)))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1)))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 R lambda1) phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)))
(*.f64 (*.f64 R lambda1) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 phi1 -1/2))))
(*.f64 (*.f64 R lambda1) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1)))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))) (fma.f64 -1/8 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 R lambda1) phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))))
(fma.f64 (*.f64 R (*.f64 (sin.f64 (*.f64 1/2 phi2)) lambda1)) (*.f64 phi1 -1/2) (*.f64 lambda1 (*.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi2))) (fma.f64 -1/8 (*.f64 phi1 phi1) 1))))
(*.f64 lambda1 (*.f64 R (+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))) (*.f64 (fma.f64 -1/8 (*.f64 phi1 phi1) 1) (cos.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1)))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))) (fma.f64 -1/8 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))) (fma.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1)))))
(+.f64 (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 R lambda1) phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)))) (*.f64 (*.f64 (*.f64 (*.f64 1/48 (pow.f64 phi1 3)) R) (sin.f64 (*.f64 1/2 phi2))) lambda1))
(fma.f64 phi1 (*.f64 -1/2 (*.f64 R (*.f64 (sin.f64 (*.f64 1/2 phi2)) lambda1))) (fma.f64 (pow.f64 phi1 3) (*.f64 1/48 (*.f64 R (*.f64 (sin.f64 (*.f64 1/2 phi2)) lambda1))) (*.f64 lambda1 (*.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi2))) (fma.f64 -1/8 (*.f64 phi1 phi1) 1)))))
(*.f64 lambda1 (*.f64 R (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (fma.f64 phi1 -1/2 (*.f64 1/48 (pow.f64 phi1 3)))) (*.f64 (fma.f64 -1/8 (*.f64 phi1 phi1) 1) (cos.f64 (*.f64 1/2 phi2))))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 R lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 R lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 R lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (*.f64 R lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (sqrt.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (cbrt.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1/3)
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(sqrt.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (pow.f64 (exp.f64 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (pow.f64 R 3)))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(expm1.f64 (log1p.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (*.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log1p.f64 (expm1.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)))) 1)
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) 1)
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (sqrt.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))) 2)
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (cbrt.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))) 3)
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (pow.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) 3) 1/3)
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(sqrt.f64 (pow.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) 2))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (pow.f64 (pow.f64 (exp.f64 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)))))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (pow.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) 3))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 lambda1 3)))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (*.f64 (pow.f64 lambda1 3) (pow.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(expm1.f64 (log1p.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (log.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (*.f64 (log.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))) 1))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log1p.f64 (expm1.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1))))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))

localize41.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
99.9%
(exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
99.9%
(*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
96.3%
(log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
94.9%
(cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))
Compiler

Compiled 92 to 44 computations (52.2% saved)

series100.0ms (0.4%)

Counts
3 → 96
Calls

24 calls:

TimeVariablePointExpression
55.0ms
phi2
@-inf
(log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
16.0ms
phi1
@-inf
(log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
14.0ms
phi2
@inf
(log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
11.0ms
phi1
@inf
(log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
1.0ms
phi1
@0
(log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))

rewrite154.0ms (0.5%)

Algorithm
batch-egg-rewrite
Rules
1262×associate-*r/
1000×distribute-lft-in
972×associate-*l/
312×add-sqr-sqrt
306×*-un-lft-identity
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01567
130467
2383567
Stop Event
node limit
Counts
3 → 113
Calls
Call 1
Inputs
(log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
Outputs
(((+.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (log.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (log.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 0 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (log.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (log.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (+.f64 0 (log.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (log.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (+.f64 0 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (*.f64 1 (log.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (*.f64 1 (log.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (*.f64 1 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (*.f64 1 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((-.f64 (+.f64 0 (exp.f64 (log1p.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((*.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((*.f64 1 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((*.f64 (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((*.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((*.f64 2 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (pow.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((sqrt.f64 (pow.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((cbrt.f64 (pow.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((expm1.f64 (log1p.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((exp.f64 (log.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((exp.f64 (*.f64 (log.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((log1p.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)))
(((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 lambda2) 1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (*.f64 (neg.f64 lambda2) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1)) (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((+.f64 (*.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 1 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (+.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 lambda1 (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 1 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 1 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((*.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (exp.f64 (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((pow.f64 (exp.f64 1) (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((sqrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((log.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((cbrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #f)))

simplify140.0ms (0.5%)

Algorithm
egg-herbie
Rules
916×associate-*r*
872×associate-+r+
844×associate-*l*
792×associate-+l+
774×+-commutative
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
04158159
110968069
259548005
Stop Event
node limit
Counts
209 → 231
Calls
Call 1
Inputs
(log.f64 (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (log.f64 (cos.f64 (*.f64 1/2 phi2))) (*.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 1/2 (*.f64 (pow.f64 phi1 2) (-.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) 1/4))) (+.f64 (log.f64 (cos.f64 (*.f64 1/2 phi2))) (*.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 1/2 (*.f64 (pow.f64 phi1 2) (-.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) 1/4))) (+.f64 (log.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))) (*.f64 1/6 (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3))) (+.f64 (*.f64 1/8 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))) (*.f64 -3/8 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))))))))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(log.f64 (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))) (log.f64 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) 1/4) (pow.f64 phi2 2))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))) (log.f64 (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 1/6 (*.f64 (pow.f64 phi2 3) (+.f64 (*.f64 -3/8 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 1/8 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))))))) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) 1/4) (pow.f64 phi2 2))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))) (log.f64 (cos.f64 (*.f64 1/2 phi1))))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(+.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 0)
(+.f64 (log.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (log.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(+.f64 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(+.f64 0 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(+.f64 (log.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (log.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)))
(+.f64 (+.f64 0 (log.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (log.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(+.f64 (+.f64 0 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(+.f64 (*.f64 1 (log.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (*.f64 1 (log.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(+.f64 (*.f64 1 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (*.f64 1 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(-.f64 (exp.f64 (log1p.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1)
(-.f64 (+.f64 0 (exp.f64 (log1p.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) 1)
(*.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(*.f64 1 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2))
(*.f64 (pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 2 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(pow.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(pow.f64 (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)
(pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 3)
(pow.f64 (pow.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) 1/3)
(sqrt.f64 (pow.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(cbrt.f64 (pow.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3))
(expm1.f64 (log1p.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(exp.f64 (log.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(exp.f64 (*.f64 (log.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1))
(log1p.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 lambda2) 1 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (*.f64 (neg.f64 lambda2) 1)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(+.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1)) (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2))))
(+.f64 (*.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 1 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1)
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (+.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 1 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 1 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1)
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2)
(pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3)
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2))
(log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))))
(cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3)))
(cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)))
(expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1))
(log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1)
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(*.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)
(pow.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) 1/3)
(pow.f64 (exp.f64 (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(pow.f64 (exp.f64 1) (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(log.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))
(cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
Outputs
(log.f64 (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (log.f64 (cos.f64 (*.f64 1/2 phi2))) (*.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (log.f64 (cos.f64 (*.f64 1/2 phi2))) (/.f64 (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2))))
(fma.f64 -1/2 (*.f64 (/.f64 phi1 (cos.f64 (*.f64 1/2 phi2))) (sin.f64 (*.f64 1/2 phi2))) (log.f64 (cos.f64 (*.f64 1/2 phi2))))
(+.f64 (*.f64 1/2 (*.f64 (pow.f64 phi1 2) (-.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) 1/4))) (+.f64 (log.f64 (cos.f64 (*.f64 1/2 phi2))) (*.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2))))))
(fma.f64 1/2 (*.f64 (*.f64 phi1 phi1) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) -1/4)) (+.f64 (log.f64 (cos.f64 (*.f64 1/2 phi2))) (/.f64 (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))))
(fma.f64 1/2 (*.f64 phi1 (*.f64 phi1 (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) -1/4))) (fma.f64 -1/2 (*.f64 (/.f64 phi1 (cos.f64 (*.f64 1/2 phi2))) (sin.f64 (*.f64 1/2 phi2))) (log.f64 (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 1/2 (*.f64 (pow.f64 phi1 2) (-.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) 1/4))) (+.f64 (log.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))) (*.f64 1/6 (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3))) (+.f64 (*.f64 1/8 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))) (*.f64 -3/8 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))))))))))
(fma.f64 1/2 (*.f64 (*.f64 phi1 phi1) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) -1/4)) (+.f64 (log.f64 (cos.f64 (*.f64 1/2 phi2))) (fma.f64 -1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2))) (*.f64 (*.f64 1/6 (pow.f64 phi1 3)) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)) (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) -1/4))))))
(+.f64 (fma.f64 1/2 (*.f64 phi1 (*.f64 phi1 (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) -1/4))) (fma.f64 -1/2 (*.f64 (/.f64 phi1 (cos.f64 (*.f64 1/2 phi2))) (sin.f64 (*.f64 1/2 phi2))) (log.f64 (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (pow.f64 phi1 3) (*.f64 (*.f64 -1/4 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)) (/.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))))) 1/6)))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))) (log.f64 (cos.f64 (*.f64 1/2 phi1))))
(fma.f64 -1/2 (/.f64 phi2 (/.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (log.f64 (cos.f64 (*.f64 1/2 phi1))))
(fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (/.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)) (log.f64 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) 1/4) (pow.f64 phi2 2))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))) (log.f64 (cos.f64 (*.f64 1/2 phi1)))))
(fma.f64 1/2 (*.f64 (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) -1/4) (*.f64 phi2 phi2)) (fma.f64 -1/2 (/.f64 phi2 (/.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (log.f64 (cos.f64 (*.f64 1/2 phi1)))))
(fma.f64 1/2 (*.f64 phi2 (*.f64 phi2 (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) -1/4))) (fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (/.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)) (log.f64 (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 1/6 (*.f64 (pow.f64 phi2 3) (+.f64 (*.f64 -3/8 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 1/8 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))))))) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) 1/4) (pow.f64 phi2 2))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))) (log.f64 (cos.f64 (*.f64 1/2 phi1))))))
(fma.f64 1/6 (*.f64 (pow.f64 phi2 3) (fma.f64 -3/8 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (*.f64 1/8 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))))) (fma.f64 1/2 (*.f64 (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) -1/4) (*.f64 phi2 phi2)) (fma.f64 -1/2 (/.f64 phi2 (/.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (log.f64 (cos.f64 (*.f64 1/2 phi1))))))
(fma.f64 1/6 (*.f64 (pow.f64 phi2 3) (fma.f64 -3/8 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (/.f64 1/8 (/.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))))) (fma.f64 1/2 (*.f64 phi2 (*.f64 phi2 (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) -1/4))) (fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (/.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)) (log.f64 (cos.f64 (*.f64 1/2 phi1))))))
(fma.f64 1/6 (*.f64 (pow.f64 phi2 3) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) -1/4))) (fma.f64 1/2 (*.f64 phi2 (*.f64 phi2 (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) -1/4))) (fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (/.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)) (log.f64 (cos.f64 (*.f64 1/2 phi1))))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(*.f64 lambda2 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(*.f64 lambda2 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(*.f64 lambda2 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (*.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 (*.f64 phi1 phi1) -1/8) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 (+.f64 1 (*.f64 (*.f64 phi1 phi1) -1/8)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (fma.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(+.f64 (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 (*.f64 phi1 phi1) -1/8) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (pow.f64 phi1 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) 1/48)))
(+.f64 (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 (+.f64 1 (*.f64 (*.f64 phi1 phi1) -1/8)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (pow.f64 phi1 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) 1/48)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (*.f64 (*.f64 -1/2 phi2) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) (-.f64 lambda1 lambda2))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 (*.f64 phi2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) -1/8))))
(+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 phi2 (*.f64 phi2 (-.f64 lambda1 lambda2))) -1/8))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2)))))))
(fma.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) (-.f64 lambda1 lambda2)))))))
(fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 3) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 (*.f64 phi2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) -1/8)))))
(fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 3) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 phi2 (*.f64 phi2 (-.f64 lambda1 lambda2))) -1/8)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))
(fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) -1/2)) (*.f64 (+.f64 (*.f64 (*.f64 phi1 phi1) -1/8) 1) (cos.f64 (*.f64 1/2 phi2))))
(+.f64 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) -1/2)) (*.f64 (+.f64 1 (*.f64 (*.f64 phi1 phi1) -1/8)) (cos.f64 (*.f64 1/2 phi2))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (pow.f64 phi1 3)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 phi1)) (fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (pow.f64 phi1 3)) (fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 (+.f64 1 (*.f64 (*.f64 phi1 phi1) -1/8)) (cos.f64 (*.f64 1/2 phi2))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (+.f64 (*.f64 -1/2 phi1) (*.f64 (pow.f64 phi1 3) 1/48))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 -1/2 phi2) (sin.f64 (*.f64 1/2 phi1))))
(fma.f64 (*.f64 phi2 -1/2) (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 phi2)))))
(+.f64 (fma.f64 (*.f64 phi2 -1/2) (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) -1/8)))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(fma.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3)) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 phi2))))))
(+.f64 (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) -1/8))) (fma.f64 (*.f64 (pow.f64 phi2 3) 1/48) (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(+.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 0)
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (log.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (log.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 0 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (log.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (log.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (+.f64 0 (log.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (log.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (+.f64 0 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 1 (log.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (*.f64 1 (log.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 1 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (*.f64 1 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (exp.f64 (log1p.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1)
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (+.f64 0 (exp.f64 (log1p.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) 1)
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 1 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 2 (log.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 3)
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (pow.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) 1/3)
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(sqrt.f64 (pow.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(sqrt.f64 (pow.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(fabs.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cbrt.f64 (pow.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(expm1.f64 (log1p.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (log.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (*.f64 (log.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1))
(log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log1p.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(log1p.f64 (+.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) -1))
(log1p.f64 (+.f64 -1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 lambda2) 1 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 lambda2) lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (+.f64 (-.f64 lambda1 lambda2) (*.f64 0 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (+.f64 (-.f64 lambda1 lambda2) (-.f64 lambda2 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (+.f64 (-.f64 lambda1 lambda2) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (+.f64 (-.f64 lambda1 lambda2) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (*.f64 (neg.f64 lambda2) 1)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1)) (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (*.f64 1 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (+.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 lambda1 (neg.f64 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (neg.f64 (+.f64 lambda2 lambda1)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 1 (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (-.f64 (neg.f64 lambda1) lambda2)) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 1 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 1 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 1 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (/.f64 (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (/.f64 (sqrt.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (/.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (/.f64 (cbrt.f64 (+.f64 lambda2 lambda1)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (/.f64 (cbrt.f64 (+.f64 lambda2 lambda1)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 (neg.f64 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (neg.f64 (+.f64 lambda2 lambda1)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 1 (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (-.f64 (neg.f64 lambda1) lambda2)) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 1 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (/.f64 (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (/.f64 (sqrt.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2))
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(fabs.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) 1/3)
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(pow.f64 (exp.f64 (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (sqrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(pow.f64 (exp.f64 (sqrt.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (cbrt.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (cbrt.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(pow.f64 (exp.f64 1) (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(pow.f64 (E.f64) (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(fabs.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))

eval650.0ms (2.3%)

Compiler

Compiled 28189 to 15727 computations (44.2% saved)

prune361.0ms (1.3%)

Pruning

51 alts after pruning (50 fresh and 1 done)

PrunedKeptTotal
New89727924
Fresh22325
Picked101
Done314
Total90351954
Accurracy
98.5%
Counts
954 → 51
Alt Table
Click to see full alt table
StatusAccuracyProgram
33.0%
(fma.f64 phi2 R (-.f64 (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (*.f64 phi1 R)))
6.9%
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 3) 1/3)
19.6%
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3) 1/3)
91.0%
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
39.4%
(-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
10.0%
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
12.9%
(-.f64 (*.f64 lambda1 (pow.f64 (cbrt.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3)) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
14.7%
(-.f64 (*.f64 lambda1 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1)))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
11.5%
(-.f64 (*.f64 lambda1 (*.f64 R (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
14.1%
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))))
8.9%
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda2 (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R) (*.f64 phi1 -1/2)) (*.f64 (fma.f64 -1/8 (*.f64 phi1 phi1) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) R)))))
7.1%
(-.f64 (*.f64 lambda1 (exp.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
49.8%
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
22.5%
(*.f64 (*.f64 lambda2 R) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (sin.f64 (*.f64 1/2 phi2))))))
19.4%
(*.f64 (*.f64 lambda2 R) (pow.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
22.5%
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1)))))
20.2%
(*.f64 (*.f64 lambda2 R) (-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1))
26.0%
(*.f64 (*.f64 lambda2 R) (sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))
20.2%
(*.f64 (*.f64 lambda2 R) (log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
20.2%
(*.f64 (*.f64 lambda2 R) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
19.5%
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 phi1)))
23.3%
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
8.0%
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)
9.3%
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
27.0%
(*.f64 (neg.f64 phi1) R)
26.5%
(*.f64 phi2 R)
17.3%
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))
19.5%
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))
8.0%
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
92.2%
(*.f64 R (hypot.f64 (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3) (-.f64 phi1 phi2)))
92.8%
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
92.6%
(*.f64 R (hypot.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (*.f64 (-.f64 lambda1 lambda2) -1)) (-.f64 phi1 phi2)))
62.3%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (-.f64 phi1 phi2)))
92.6%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)) (-.f64 phi1 phi2)))
92.7%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1)) (-.f64 phi1 phi2)))
56.7%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (cos.f64 (*.f64 1/2 phi2))))) (-.f64 phi1 phi2)))
69.1%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))) (-.f64 phi1 phi2)))
73.1%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 -1/2 phi2) (sin.f64 (*.f64 1/2 phi1))))) (-.f64 phi1 phi2)))
82.6%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (/.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1) phi1)) (fma.f64 1/2 (*.f64 -1/4 (*.f64 (+.f64 (*.f64 (tan.f64 (/.f64 phi2 4)) (tan.f64 (/.f64 phi2 4))) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1))) (*.f64 phi1 phi1))) (log1p.f64 (cos.f64 (*.f64 1/2 phi2))))))) (-.f64 phi1 phi2)))
92.5%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2) 2)))) (-.f64 phi1 phi2)))
81.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/2 phi2))))) (-.f64 phi1 phi2)))
81.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2)))))) (-.f64 phi1 phi2)))
86.5%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1)))))) (-.f64 phi1 phi2)))
85.5%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (fabs.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (-.f64 phi1 phi2)))
67.8%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 1/2 phi1))))) (-.f64 phi1 phi2)))
81.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi2))) (-.f64 phi1 phi2)))
86.7%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
46.5%
(*.f64 R (hypot.f64 (expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
49.8%
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
20.2%
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
41.5%
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3))
Compiler

Compiled 2378 to 1730 computations (27.2% saved)

localize48.0ms (0.2%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
100.0%
(/.f64 1 (-.f64 lambda1 lambda2))
99.9%
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
99.5%
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2)))
94.9%
(cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))
Compiler

Compiled 83 to 38 computations (54.2% saved)

series50.0ms (0.2%)

Counts
3 → 132
Calls

33 calls:

TimeVariablePointExpression
42.0ms
phi1
@inf
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
1.0ms
phi2
@0
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
1.0ms
phi1
@0
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
0.0ms
lambda2
@0
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
0.0ms
lambda1
@0
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))

rewrite120.0ms (0.4%)

Algorithm
batch-egg-rewrite
Rules
1754×associate-/r*
426×add-sqr-sqrt
416×*-un-lft-identity
414×pow1
390×add-exp-log
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
019101
140889
2544089
Stop Event
node limit
Counts
3 → 80
Calls
Call 1
Inputs
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2)))
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
(/.f64 1 (-.f64 lambda1 lambda2))
Outputs
(((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (/.f64 -1 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (/.f64 1 (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1) (neg.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) 1) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((neg.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 -1 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((log.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((cbrt.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3) (pow.f64 R 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (/.f64 1 (-.f64 lambda1 lambda2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 1 (/.f64 1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 -1 (/.f64 -1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (/.f64 1 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (/.f64 1 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) -1) (pow.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) -1) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (-.f64 lambda1 lambda2) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((sqrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((log.f64 (exp.f64 (/.f64 1 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 1 (-.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((cbrt.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((expm1.f64 (log1p.f64 (/.f64 1 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (neg.f64 (log.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (*.f64 (log.f64 (-.f64 lambda1 lambda2)) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (*.f64 (neg.f64 (log.f64 (-.f64 lambda1 lambda2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)) ((log1p.f64 (expm1.f64 (/.f64 1 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))) (/.f64 1 (-.f64 lambda1 lambda2))) #f)))

simplify207.0ms (0.7%)

Algorithm
egg-herbie
Rules
1340×associate-*r*
912×*-commutative
896×associate-*l*
878×associate-+r+
862×fma-def
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
057715834
1183215130
2795615130
Stop Event
node limit
Counts
212 → 281
Calls
Call 1
Inputs
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R)
(+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) (*.f64 (pow.f64 phi1 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 phi1 3) (*.f64 R (-.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2))) (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) (*.f64 (pow.f64 phi1 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 phi1 R)
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2))) phi1)) (*.f64 phi1 R)))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2))) phi1)) (+.f64 (*.f64 phi1 R) (*.f64 1/2 (/.f64 (*.f64 R (*.f64 phi2 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)))) (pow.f64 phi1 2))))))
(*.f64 -1 (*.f64 phi1 R))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (*.f64 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi1 2))) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R)
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 R (pow.f64 phi2 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (*.f64 (pow.f64 phi2 3) (-.f64 (+.f64 (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 R (pow.f64 phi2 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R phi2)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2))) phi2))))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (+.f64 (*.f64 1/2 (/.f64 (*.f64 phi1 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2)))) (pow.f64 phi2 2))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2))) phi2)))))
(*.f64 -1 (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi2 2))) (+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2)))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 (pow.f64 lambda1 3) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))))))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) (*.f64 lambda2 R)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))))
(*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 lambda2 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 3) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2)) lambda1)) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))))
(*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) R) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) (*.f64 R lambda1)) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) R) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))))
(/.f64 -1 lambda2)
(-.f64 (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2))) (/.f64 1 lambda2))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (pow.f64 lambda2 3))) (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2)))) (/.f64 1 lambda2))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (pow.f64 lambda2 3))) (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2))))) (/.f64 1 lambda2))
(/.f64 1 lambda1)
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (/.f64 1 lambda1))
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (+.f64 (/.f64 (pow.f64 lambda2 2) (pow.f64 lambda1 3)) (/.f64 1 lambda1)))
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (+.f64 (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4)) (+.f64 (/.f64 (pow.f64 lambda2 2) (pow.f64 lambda1 3)) (/.f64 1 lambda1))))
(/.f64 1 lambda1)
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (/.f64 1 lambda1))
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (+.f64 (/.f64 (pow.f64 lambda2 2) (pow.f64 lambda1 3)) (/.f64 1 lambda1)))
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (+.f64 (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4)) (+.f64 (/.f64 (pow.f64 lambda2 2) (pow.f64 lambda1 3)) (/.f64 1 lambda1))))
(/.f64 1 lambda1)
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (/.f64 1 lambda1))
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (+.f64 (/.f64 (pow.f64 lambda2 2) (pow.f64 lambda1 3)) (/.f64 1 lambda1)))
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (+.f64 (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4)) (+.f64 (/.f64 (pow.f64 lambda2 2) (pow.f64 lambda1 3)) (/.f64 1 lambda1))))
(/.f64 -1 lambda2)
(-.f64 (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2))) (/.f64 1 lambda2))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (pow.f64 lambda2 3))) (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2)))) (/.f64 1 lambda2))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (pow.f64 lambda2 3))) (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2))))) (/.f64 1 lambda2))
(/.f64 -1 lambda2)
(-.f64 (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2))) (/.f64 1 lambda2))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (pow.f64 lambda2 3))) (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2)))) (/.f64 1 lambda2))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (pow.f64 lambda2 3))) (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2))))) (/.f64 1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1)
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))
(*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1)
(*.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2)))
(*.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2)))
(*.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (/.f64 -1 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 1 (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1) (neg.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) 1) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1)
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2)
(pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3)
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3)
(pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1)
(neg.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 -1 (-.f64 lambda1 lambda2))))
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2))
(log.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))))
(cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3))
(cbrt.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3)))
(expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1))
(log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 1)
(pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1)
(pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2))
(log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3)))
(cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3) (pow.f64 R 3)))
(expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1))
(log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 1 (-.f64 lambda1 lambda2)))) 1)
(*.f64 1 (/.f64 1 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 1)
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (pow.f64 (-.f64 lambda1 lambda2) -1/2))
(*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)))
(*.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 -1 (/.f64 -1 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 1 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 1 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (pow.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) -1) (pow.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) -1))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) -1) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) -1))
(pow.f64 (-.f64 lambda1 lambda2) -1)
(pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 1)
(pow.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) 2)
(pow.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) 3)
(pow.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3) 1/3)
(sqrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))
(log.f64 (exp.f64 (/.f64 1 (-.f64 lambda1 lambda2))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 1 (-.f64 lambda1 lambda2)))))
(cbrt.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3))
(expm1.f64 (log1p.f64 (/.f64 1 (-.f64 lambda1 lambda2))))
(exp.f64 (neg.f64 (log.f64 (-.f64 lambda1 lambda2))))
(exp.f64 (*.f64 (log.f64 (-.f64 lambda1 lambda2)) -1))
(exp.f64 (*.f64 (neg.f64 (log.f64 (-.f64 lambda1 lambda2))) 1))
(log1p.f64 (expm1.f64 (/.f64 1 (-.f64 lambda1 lambda2))))
Outputs
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (-.f64 lambda1 lambda2) phi1))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi2)))) (fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (*.f64 -1/8 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (-.f64 lambda1 lambda2) phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi2)))) (fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (fma.f64 1/48 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi2))) (pow.f64 phi1 3)) (*.f64 -1/8 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))
(+.f64 (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (-.f64 lambda1 lambda2) phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi2))) (*.f64 1/48 (pow.f64 phi1 3))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (*.f64 (*.f64 -1/2 phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1)))))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 phi2 phi2))))))
(fma.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 (*.f64 phi2 (-.f64 lambda1 lambda2))) -1/8))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2)))))))
(fma.f64 1/48 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1))) (pow.f64 phi2 3)) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 phi2 phi2)))))))
(fma.f64 1/48 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3))) (fma.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 (*.f64 phi2 (-.f64 lambda1 lambda2))) -1/8)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R)
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))))
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))) R (*.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 phi1 R))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))))))
(fma.f64 1/2 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (*.f64 phi1 (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2))))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) (*.f64 (pow.f64 phi1 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(fma.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))) R (*.f64 1/2 (+.f64 (*.f64 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))) (*.f64 (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))))) 2))) (*.f64 (*.f64 phi1 phi1) R))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))) (+.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (*.f64 phi1 R)) (*.f64 (+.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) (-.f64 1 (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))) (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) 1/2)) 2))) (*.f64 phi1 (*.f64 phi1 R))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 phi1 3) (*.f64 R (-.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2))) (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) (*.f64 (pow.f64 phi1 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))
(fma.f64 1/2 (*.f64 (pow.f64 phi1 3) (*.f64 (*.f64 R (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (*.f64 -1/2 (/.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))))) (fma.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))) R (*.f64 1/2 (+.f64 (*.f64 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))) (*.f64 (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))))) 2))) (*.f64 (*.f64 phi1 phi1) R)))))))
(fma.f64 (*.f64 (*.f64 1/2 (*.f64 (pow.f64 phi1 3) R)) (fma.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi2)))) 1/6 (*.f64 -1/2 (*.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2))) (+.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) (-.f64 1 (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))) (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) 1/2)) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))) (+.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (*.f64 phi1 R)) (*.f64 (+.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) (-.f64 1 (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2)))) (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) 1/2)) 2))) (*.f64 phi1 (*.f64 phi1 R))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 phi2 phi2))))))
(*.f64 phi1 R)
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(fma.f64 -1 (*.f64 phi2 R) (*.f64 phi1 R))
(-.f64 (*.f64 phi1 R) (*.f64 phi2 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2))) phi1)) (*.f64 phi1 R)))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 1/2 (/.f64 R (/.f64 phi1 (-.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 phi1 R)))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 R phi1) (-.f64 (fma.f64 phi2 phi2 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi2 phi2))) (*.f64 phi1 R)) (*.f64 phi2 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2))) phi1)) (+.f64 (*.f64 phi1 R) (*.f64 1/2 (/.f64 (*.f64 R (*.f64 phi2 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)))) (pow.f64 phi1 2))))))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 1/2 (/.f64 R (/.f64 phi1 (-.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (neg.f64 phi2) 2)))) (fma.f64 phi1 R (/.f64 (*.f64 1/2 (*.f64 (*.f64 phi2 R) (-.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 phi1 phi1)))))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 R phi1) (-.f64 (fma.f64 phi2 phi2 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi2 phi2))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 phi2 (-.f64 (fma.f64 phi2 phi2 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi2 phi2))) phi1) (/.f64 R phi1)) (*.f64 phi1 R))) (*.f64 phi2 R))
(*.f64 -1 (*.f64 phi1 R))
(*.f64 (neg.f64 phi1) R)
(*.f64 phi1 (neg.f64 R))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(fma.f64 R phi2 (*.f64 (neg.f64 phi1) R))
(*.f64 R (+.f64 phi2 (neg.f64 phi1)))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))))
(fma.f64 R phi2 (fma.f64 -1 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))) 2) (/.f64 phi1 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) R))))))
(fma.f64 phi2 R (-.f64 (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (*.f64 phi1 R)))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (*.f64 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi1 2))) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))))
(fma.f64 R phi2 (fma.f64 -1 (*.f64 phi1 R) (*.f64 -1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))) 2) (/.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi2 R) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))) 2) (/.f64 phi1 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) R)))))))
(fma.f64 phi2 R (fma.f64 -1/2 (+.f64 (/.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (/.f64 (*.f64 (*.f64 phi2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi1 phi1))) (*.f64 phi1 (neg.f64 R))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R)
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R))
(fma.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))
(fma.f64 (*.f64 (*.f64 1/2 (*.f64 phi2 R)) (fma.f64 phi1 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 R (pow.f64 phi2 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(fma.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (*.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)) (*.f64 (*.f64 (*.f64 phi2 phi2) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))))))
(fma.f64 1/2 (*.f64 (*.f64 phi2 R) (*.f64 (fma.f64 phi1 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))))) (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) 1)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))) (*.f64 1/2 (fma.f64 phi1 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))) (*.f64 phi2 (*.f64 phi2 R)))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (*.f64 (pow.f64 phi2 3) (-.f64 (+.f64 (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 R (pow.f64 phi2 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))
(fma.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (*.f64 R (pow.f64 phi2 3)) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (*.f64 -1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)) (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))))) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (*.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)) (*.f64 (*.f64 (*.f64 phi2 phi2) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))))
(fma.f64 1/2 (*.f64 (*.f64 phi2 R) (*.f64 (fma.f64 phi1 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))))) (fma.f64 1/2 (*.f64 R (*.f64 (*.f64 (pow.f64 phi2 3) (fma.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6 (*.f64 -1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) 1)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))) (*.f64 1/2 (fma.f64 phi1 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 (fma.f64 phi1 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))))) (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) 1)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))) (*.f64 1/2 (fma.f64 phi1 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))) (*.f64 phi2 (*.f64 phi2 R)))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi1 phi1)))))))
(*.f64 R phi2)
(*.f64 phi2 R)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(fma.f64 R phi2 (*.f64 (neg.f64 phi1) R))
(*.f64 R (+.f64 phi2 (neg.f64 phi1)))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2))) phi2))))
(fma.f64 -1 (*.f64 phi1 R) (fma.f64 R phi2 (*.f64 1/2 (/.f64 R (/.f64 phi2 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2)))))))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 R phi2) (-.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi1 phi1))) (*.f64 phi2 R)) (*.f64 phi1 R))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (+.f64 (*.f64 1/2 (/.f64 (*.f64 phi1 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2)))) (pow.f64 phi2 2))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2))) phi2)))))
(fma.f64 -1 (*.f64 phi1 R) (fma.f64 R phi2 (*.f64 1/2 (+.f64 (/.f64 phi1 (/.f64 (*.f64 phi2 phi2) (*.f64 R (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2))))) (/.f64 R (/.f64 phi2 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2))))))))
(-.f64 (fma.f64 1/2 (+.f64 (*.f64 (/.f64 R phi2) (-.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi1 phi1))) (*.f64 (*.f64 (/.f64 R phi2) (-.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi1 phi1))) (/.f64 phi1 phi2))) (*.f64 phi2 R)) (*.f64 phi1 R))
(*.f64 -1 (*.f64 R phi2))
(neg.f64 (*.f64 phi2 R))
(*.f64 (neg.f64 phi2) R)
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(fma.f64 -1 (*.f64 phi2 R) (*.f64 phi1 R))
(-.f64 (*.f64 phi1 R) (*.f64 phi2 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2))))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 phi1 R (*.f64 -1/2 (/.f64 R (/.f64 phi2 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))) 2)))))))
(-.f64 (fma.f64 -1/2 (*.f64 (/.f64 R phi2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi1 R)) (*.f64 phi2 R))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi2 2))) (+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2)))))
(fma.f64 -1/2 (/.f64 phi1 (/.f64 (*.f64 phi2 phi2) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))) 2))))) (fma.f64 -1 (*.f64 phi2 R) (fma.f64 phi1 R (*.f64 -1/2 (/.f64 R (/.f64 phi2 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))) 2))))))))
(fma.f64 -1/2 (*.f64 (*.f64 (/.f64 R phi2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 phi1 phi2)) (-.f64 (fma.f64 -1/2 (*.f64 (/.f64 R phi2) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 phi1 R)) (*.f64 phi2 R)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 (*.f64 R (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))))
(-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (*.f64 lambda1 lambda1)))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 (pow.f64 lambda1 3) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R (*.f64 1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 R (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) lambda2) (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (pow.f64 lambda1 3))))))))
(-.f64 (fma.f64 1/2 (fma.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (*.f64 lambda1 lambda1))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3))) (*.f64 (*.f64 (*.f64 lambda2 R) (*.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) lambda1)) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(fma.f64 -1 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R))
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 1/2 (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2)) 2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 R lambda1)) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 R lambda1)) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) (*.f64 lambda2 R)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 1/2 (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2)) 2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (*.f64 lambda2 R) (*.f64 lambda1 lambda1))) (fma.f64 1/2 (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2)) 2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 R lambda1)) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R))))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 (/.f64 lambda2 lambda1) lambda1) (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) R))) (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 R lambda1)) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(neg.f64 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(fma.f64 -1/2 (*.f64 (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) lambda1)) (fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(fma.f64 -1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 R lambda1)) (-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 lambda2 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1/2 (*.f64 (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) lambda1)) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 lambda2 R) (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (*.f64 (*.f64 lambda1 lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(fma.f64 -1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 R lambda1)) (fma.f64 -1/2 (*.f64 (/.f64 (/.f64 lambda2 lambda1) lambda1) (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) R))) (-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (*.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)) (*.f64 R (*.f64 lambda2 lambda2)))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(-.f64 (fma.f64 (*.f64 (*.f64 1/2 (*.f64 R (*.f64 lambda2 lambda2))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (neg.f64 (*.f64 lambda1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 3) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 lambda2 3) R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (fma.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (*.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)) (*.f64 R (*.f64 lambda2 lambda2)))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(-.f64 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (neg.f64 (*.f64 lambda1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))))) 2)) (*.f64 (pow.f64 lambda2 3) (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3)))))) (fma.f64 (*.f64 (*.f64 1/2 (*.f64 R (*.f64 lambda2 lambda2))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (neg.f64 (*.f64 lambda1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R) (fma.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 1/2 (*.f64 (/.f64 R lambda2) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1) 2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 R lambda2) (/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2)) lambda1)) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R) (fma.f64 1/2 (*.f64 (/.f64 R (*.f64 lambda2 lambda2)) (/.f64 (*.f64 lambda1 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (fma.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 1/2 (*.f64 (/.f64 R lambda2) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1) 2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (*.f64 lambda1 R) (*.f64 lambda2 lambda2))) (fma.f64 1/2 (*.f64 (/.f64 R lambda2) (/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (neg.f64 lambda2) (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(fma.f64 -1 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R))
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) R) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 -1/2 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)))
(-.f64 (fma.f64 -1/2 (*.f64 (/.f64 R lambda2) (/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) (*.f64 R lambda1)) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) R) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 -1/2 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 R))) (fma.f64 -1/2 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R))))
(-.f64 (fma.f64 -1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (*.f64 lambda1 R) (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 (/.f64 R lambda2) (/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(/.f64 -1 lambda2)
(-.f64 (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2))) (/.f64 1 lambda2))
(-.f64 (neg.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2))) (/.f64 1 lambda2))
(fma.f64 -1 (/.f64 lambda1 (*.f64 lambda2 lambda2)) (/.f64 -1 lambda2))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (pow.f64 lambda2 3))) (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2)))) (/.f64 1 lambda2))
(-.f64 (fma.f64 -1 (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 3)) (neg.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2)))) (/.f64 1 lambda2))
(fma.f64 -1 (+.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 3))) (/.f64 -1 lambda2))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (pow.f64 lambda2 3))) (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2))))) (/.f64 1 lambda2))
(-.f64 (fma.f64 -1 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4)) (fma.f64 -1 (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 3)) (neg.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2))))) (/.f64 1 lambda2))
(+.f64 (-.f64 (-.f64 (/.f64 (neg.f64 (pow.f64 lambda1 3)) (pow.f64 lambda2 4)) (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 3))) (/.f64 lambda1 (*.f64 lambda2 lambda2))) (/.f64 -1 lambda2))
(/.f64 1 lambda1)
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (/.f64 1 lambda1))
(+.f64 (/.f64 1 lambda1) (/.f64 lambda2 (*.f64 lambda1 lambda1)))
(+.f64 (/.f64 1 lambda1) (/.f64 (/.f64 lambda2 lambda1) lambda1))
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (+.f64 (/.f64 (pow.f64 lambda2 2) (pow.f64 lambda1 3)) (/.f64 1 lambda1)))
(+.f64 (/.f64 lambda2 (*.f64 lambda1 lambda1)) (+.f64 (/.f64 1 lambda1) (/.f64 (*.f64 lambda2 lambda2) (pow.f64 lambda1 3))))
(+.f64 (/.f64 1 lambda1) (+.f64 (/.f64 (/.f64 lambda2 lambda1) lambda1) (/.f64 lambda2 (/.f64 (pow.f64 lambda1 3) lambda2))))
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (+.f64 (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4)) (+.f64 (/.f64 (pow.f64 lambda2 2) (pow.f64 lambda1 3)) (/.f64 1 lambda1))))
(+.f64 (/.f64 lambda2 (*.f64 lambda1 lambda1)) (+.f64 (+.f64 (/.f64 1 lambda1) (/.f64 (*.f64 lambda2 lambda2) (pow.f64 lambda1 3))) (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4))))
(+.f64 (+.f64 (/.f64 lambda2 (/.f64 (pow.f64 lambda1 3) lambda2)) (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4))) (+.f64 (/.f64 1 lambda1) (/.f64 (/.f64 lambda2 lambda1) lambda1)))
(+.f64 (+.f64 (/.f64 1 lambda1) (/.f64 (/.f64 lambda2 lambda1) lambda1)) (+.f64 (/.f64 lambda2 (/.f64 (pow.f64 lambda1 3) lambda2)) (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4))))
(/.f64 1 lambda1)
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (/.f64 1 lambda1))
(+.f64 (/.f64 1 lambda1) (/.f64 lambda2 (*.f64 lambda1 lambda1)))
(+.f64 (/.f64 1 lambda1) (/.f64 (/.f64 lambda2 lambda1) lambda1))
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (+.f64 (/.f64 (pow.f64 lambda2 2) (pow.f64 lambda1 3)) (/.f64 1 lambda1)))
(+.f64 (/.f64 lambda2 (*.f64 lambda1 lambda1)) (+.f64 (/.f64 1 lambda1) (/.f64 (*.f64 lambda2 lambda2) (pow.f64 lambda1 3))))
(+.f64 (/.f64 1 lambda1) (+.f64 (/.f64 (/.f64 lambda2 lambda1) lambda1) (/.f64 lambda2 (/.f64 (pow.f64 lambda1 3) lambda2))))
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (+.f64 (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4)) (+.f64 (/.f64 (pow.f64 lambda2 2) (pow.f64 lambda1 3)) (/.f64 1 lambda1))))
(+.f64 (/.f64 lambda2 (*.f64 lambda1 lambda1)) (+.f64 (+.f64 (/.f64 1 lambda1) (/.f64 (*.f64 lambda2 lambda2) (pow.f64 lambda1 3))) (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4))))
(+.f64 (+.f64 (/.f64 lambda2 (/.f64 (pow.f64 lambda1 3) lambda2)) (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4))) (+.f64 (/.f64 1 lambda1) (/.f64 (/.f64 lambda2 lambda1) lambda1)))
(+.f64 (+.f64 (/.f64 1 lambda1) (/.f64 (/.f64 lambda2 lambda1) lambda1)) (+.f64 (/.f64 lambda2 (/.f64 (pow.f64 lambda1 3) lambda2)) (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4))))
(/.f64 1 lambda1)
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (/.f64 1 lambda1))
(+.f64 (/.f64 1 lambda1) (/.f64 lambda2 (*.f64 lambda1 lambda1)))
(+.f64 (/.f64 1 lambda1) (/.f64 (/.f64 lambda2 lambda1) lambda1))
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (+.f64 (/.f64 (pow.f64 lambda2 2) (pow.f64 lambda1 3)) (/.f64 1 lambda1)))
(+.f64 (/.f64 lambda2 (*.f64 lambda1 lambda1)) (+.f64 (/.f64 1 lambda1) (/.f64 (*.f64 lambda2 lambda2) (pow.f64 lambda1 3))))
(+.f64 (/.f64 1 lambda1) (+.f64 (/.f64 (/.f64 lambda2 lambda1) lambda1) (/.f64 lambda2 (/.f64 (pow.f64 lambda1 3) lambda2))))
(+.f64 (/.f64 lambda2 (pow.f64 lambda1 2)) (+.f64 (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4)) (+.f64 (/.f64 (pow.f64 lambda2 2) (pow.f64 lambda1 3)) (/.f64 1 lambda1))))
(+.f64 (/.f64 lambda2 (*.f64 lambda1 lambda1)) (+.f64 (+.f64 (/.f64 1 lambda1) (/.f64 (*.f64 lambda2 lambda2) (pow.f64 lambda1 3))) (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4))))
(+.f64 (+.f64 (/.f64 lambda2 (/.f64 (pow.f64 lambda1 3) lambda2)) (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4))) (+.f64 (/.f64 1 lambda1) (/.f64 (/.f64 lambda2 lambda1) lambda1)))
(+.f64 (+.f64 (/.f64 1 lambda1) (/.f64 (/.f64 lambda2 lambda1) lambda1)) (+.f64 (/.f64 lambda2 (/.f64 (pow.f64 lambda1 3) lambda2)) (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4))))
(/.f64 -1 lambda2)
(-.f64 (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2))) (/.f64 1 lambda2))
(-.f64 (neg.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2))) (/.f64 1 lambda2))
(fma.f64 -1 (/.f64 lambda1 (*.f64 lambda2 lambda2)) (/.f64 -1 lambda2))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (pow.f64 lambda2 3))) (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2)))) (/.f64 1 lambda2))
(-.f64 (fma.f64 -1 (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 3)) (neg.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2)))) (/.f64 1 lambda2))
(fma.f64 -1 (+.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 3))) (/.f64 -1 lambda2))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (pow.f64 lambda2 3))) (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2))))) (/.f64 1 lambda2))
(-.f64 (fma.f64 -1 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4)) (fma.f64 -1 (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 3)) (neg.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2))))) (/.f64 1 lambda2))
(+.f64 (-.f64 (-.f64 (/.f64 (neg.f64 (pow.f64 lambda1 3)) (pow.f64 lambda2 4)) (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 3))) (/.f64 lambda1 (*.f64 lambda2 lambda2))) (/.f64 -1 lambda2))
(/.f64 -1 lambda2)
(-.f64 (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2))) (/.f64 1 lambda2))
(-.f64 (neg.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2))) (/.f64 1 lambda2))
(fma.f64 -1 (/.f64 lambda1 (*.f64 lambda2 lambda2)) (/.f64 -1 lambda2))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (pow.f64 lambda2 3))) (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2)))) (/.f64 1 lambda2))
(-.f64 (fma.f64 -1 (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 3)) (neg.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2)))) (/.f64 1 lambda2))
(fma.f64 -1 (+.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 3))) (/.f64 -1 lambda2))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (pow.f64 lambda2 3))) (*.f64 -1 (/.f64 lambda1 (pow.f64 lambda2 2))))) (/.f64 1 lambda2))
(-.f64 (fma.f64 -1 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4)) (fma.f64 -1 (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 3)) (neg.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2))))) (/.f64 1 lambda2))
(+.f64 (-.f64 (-.f64 (/.f64 (neg.f64 (pow.f64 lambda1 3)) (pow.f64 lambda2 4)) (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 3))) (/.f64 lambda1 (*.f64 lambda2 lambda2))) (/.f64 -1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (/.f64 -1 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (/.f64 1 (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1) (neg.f64 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) 1) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)))
(*.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))))
(pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(neg.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 -1 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2))
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(fabs.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(log.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3)))
(cbrt.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (/.f64 1 (pow.f64 (-.f64 lambda1 lambda2) 3))))
(cbrt.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3)))
(expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 1)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3) 1/3)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))) 2))
(fabs.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3) (pow.f64 R 3)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(-.f64 (exp.f64 (log1p.f64 (/.f64 1 (-.f64 lambda1 lambda2)))) 1)
(/.f64 1 (-.f64 lambda1 lambda2))
(*.f64 1 (/.f64 1 (-.f64 lambda1 lambda2)))
(/.f64 1 (-.f64 lambda1 lambda2))
(*.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 1)
(/.f64 1 (-.f64 lambda1 lambda2))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (pow.f64 (-.f64 lambda1 lambda2) -1/2))
(/.f64 1 (-.f64 lambda1 lambda2))
(*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)))
(*.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 -1 (/.f64 -1 (-.f64 lambda1 lambda2)))
(/.f64 1 (-.f64 lambda1 lambda2))
(*.f64 (/.f64 1 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (/.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)) (-.f64 lambda1 lambda2))
(*.f64 (/.f64 1 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (pow.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) -1) (pow.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) -1))
(pow.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) -2)
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) -1) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) -1))
(*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (/.f64 1 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)))
(/.f64 (*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) 1) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2))
(pow.f64 (-.f64 lambda1 lambda2) -1)
(/.f64 1 (-.f64 lambda1 lambda2))
(pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 1)
(/.f64 1 (-.f64 lambda1 lambda2))
(pow.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) 2)
(/.f64 1 (-.f64 lambda1 lambda2))
(pow.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) 3)
(/.f64 1 (-.f64 lambda1 lambda2))
(pow.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3) 1/3)
(/.f64 1 (-.f64 lambda1 lambda2))
(sqrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))
(log.f64 (exp.f64 (/.f64 1 (-.f64 lambda1 lambda2))))
(/.f64 1 (-.f64 lambda1 lambda2))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 1 (-.f64 lambda1 lambda2)))))
(/.f64 1 (-.f64 lambda1 lambda2))
(cbrt.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3))
(/.f64 1 (-.f64 lambda1 lambda2))
(expm1.f64 (log1p.f64 (/.f64 1 (-.f64 lambda1 lambda2))))
(/.f64 1 (-.f64 lambda1 lambda2))
(exp.f64 (neg.f64 (log.f64 (-.f64 lambda1 lambda2))))
(/.f64 1 (-.f64 lambda1 lambda2))
(exp.f64 (*.f64 (log.f64 (-.f64 lambda1 lambda2)) -1))
(/.f64 1 (-.f64 lambda1 lambda2))
(exp.f64 (*.f64 (neg.f64 (log.f64 (-.f64 lambda1 lambda2))) 1))
(/.f64 1 (-.f64 lambda1 lambda2))
(log1p.f64 (expm1.f64 (/.f64 1 (-.f64 lambda1 lambda2))))
(/.f64 1 (-.f64 lambda1 lambda2))

localize5.0ms (0%)

Compiler

Compiled 13 to 7 computations (46.2% saved)

localize41.0ms (0.1%)

Local Accuracy

Found 2 expressions with local accuracy:

NewAccuracyProgram
99.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
99.8%
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))
Compiler

Compiled 58 to 28 computations (51.7% saved)

series52.0ms (0.2%)

Counts
2 → 96
Calls

24 calls:

TimeVariablePointExpression
33.0ms
lambda1
@inf
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))
3.0ms
phi2
@0
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
2.0ms
lambda2
@0
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
2.0ms
R
@0
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
2.0ms
lambda1
@0
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))

rewrite143.0ms (0.5%)

Algorithm
batch-egg-rewrite
Rules
1154×associate-*r/
952×distribute-lft-in
910×associate-*l/
358×add-sqr-sqrt
352×*-un-lft-identity
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01664
133764
2435464
Stop Event
node limit
Counts
2 → 81
Calls
Call 1
Inputs
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
Outputs
(((+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (neg.f64 lambda2) 1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (neg.f64 lambda2) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 phi1))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 lambda1 (cos.f64 (*.f64 1/2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) (*.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 1 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (+.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 lambda1 (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 1 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 1 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (cos.f64 (*.f64 1/2 phi1))) (-.f64 lambda1 (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 1/2 phi1))) (neg.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 1/2 phi1))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) 3) (pow.f64 R 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #f)))

simplify210.0ms (0.7%)

Algorithm
egg-herbie
Rules
1110×+-commutative
1082×associate-*r*
836×associate-+l+
738×associate-+r+
728×fma-def
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
052012543
1161311989
2708711987
Stop Event
node limit
Counts
177 → 258
Calls
Call 1
Inputs
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(-.f64 lambda1 lambda2)
(-.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (-.f64 lambda1 lambda2))) lambda1) lambda2)
(-.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 phi1 4) (-.f64 lambda1 lambda2))) lambda1)) lambda2)
(-.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 -1/46080 (*.f64 (pow.f64 phi1 6) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 phi1 4) (-.f64 lambda1 lambda2))) lambda1))) lambda2)
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))
(+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 1/2 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R (*.f64 (pow.f64 lambda1 3) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2)) R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 lambda1 2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))))
(*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))
(+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))
(+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 lambda1 2)))) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))
(+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) lambda1)))) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) lambda1)) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))))
(*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) R) (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) (*.f64 R lambda1)) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) R) (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 (pow.f64 phi1 2) (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) R)))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)))
(+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))) (*.f64 (pow.f64 phi1 3) (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) (*.f64 R phi2))))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 (pow.f64 phi1 2) (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) R)))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))))
(*.f64 phi1 R)
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) R) phi1)) (*.f64 phi1 R)))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) (*.f64 R phi2)) (pow.f64 phi1 2))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) R) phi1)) (*.f64 phi1 R))))
(*.f64 -1 (*.f64 phi1 R))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi1 2))) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R)
(+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 phi1 (*.f64 R phi2)))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 R (pow.f64 phi2 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 phi1 (*.f64 R phi2))))))
(+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (/.f64 (*.f64 phi1 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) phi1)) 2)) (*.f64 R (pow.f64 phi2 3)))) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 R (pow.f64 phi2 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 phi1 (*.f64 R phi2)))))))
(*.f64 R phi2)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2)) R) phi2)) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2)) R) phi2)) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (*.f64 1/2 (/.f64 (*.f64 phi1 (*.f64 (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2)) R)) (pow.f64 phi2 2))))))
(*.f64 -1 (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2)) (*.f64 phi1 R)))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 phi1 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi2 2))))))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (neg.f64 lambda2) 1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (neg.f64 lambda2) 1)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 phi1))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 lambda1 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) (*.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2))))
(+.f64 (*.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 1 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1)))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))) 1)
(/.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 1 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (+.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))
(/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 phi1))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 1 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 1 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (cos.f64 (*.f64 1/2 phi1))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 1/2 phi1))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 1/2 phi1))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) 1) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) 1) (+.f64 lambda1 lambda2))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) 1)
(pow.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) 2)
(pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) 3)
(pow.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) 2))
(log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))))
(cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) 3))
(cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3)))
(expm1.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))))
(exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) 1))
(log1p.f64 (expm1.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1)
(pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)
(pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2)
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 3)
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))
(log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) 3)))
(cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) 3) (pow.f64 R 3)))
(expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 1))
(log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
Outputs
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2))
(*.f64 lambda2 (neg.f64 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2))
(*.f64 lambda2 (neg.f64 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2))
(*.f64 lambda2 (neg.f64 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(-.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (-.f64 lambda1 lambda2))) lambda1) lambda2)
(-.f64 (fma.f64 -1/8 (*.f64 (-.f64 lambda1 lambda2) (*.f64 phi1 phi1)) lambda1) lambda2)
(*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (-.f64 lambda1 lambda2))
(*.f64 (+.f64 1 (*.f64 -1/8 (*.f64 phi1 phi1))) (-.f64 lambda1 lambda2))
(-.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 phi1 4) (-.f64 lambda1 lambda2))) lambda1)) lambda2)
(-.f64 (fma.f64 -1/8 (*.f64 (-.f64 lambda1 lambda2) (*.f64 phi1 phi1)) (fma.f64 1/384 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 phi1 4)) lambda1)) lambda2)
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) (*.f64 1/384 (pow.f64 phi1 4)))) (-.f64 lambda1 lambda2))
(+.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) (*.f64 1/384 (pow.f64 phi1 4)))))
(-.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 -1/46080 (*.f64 (pow.f64 phi1 6) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 phi1 4) (-.f64 lambda1 lambda2))) lambda1))) lambda2)
(-.f64 (fma.f64 -1/8 (*.f64 (-.f64 lambda1 lambda2) (*.f64 phi1 phi1)) (fma.f64 -1/46080 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 phi1 6)) (fma.f64 1/384 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 phi1 4)) lambda1))) lambda2)
(fma.f64 -1/8 (*.f64 phi1 (*.f64 phi1 (-.f64 lambda1 lambda2))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 -1/46080 (pow.f64 phi1 6)) (*.f64 1/384 (pow.f64 phi1 4)))) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 1/384 (pow.f64 phi1 4)) (*.f64 -1/46080 (pow.f64 phi1 6)))) (*.f64 (+.f64 1 (*.f64 -1/8 (*.f64 phi1 phi1))) (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)))) (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) R)) (*.f64 lambda2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 R (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)))) (fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)))) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)))) (*.f64 (neg.f64 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) 2)) (*.f64 (*.f64 lambda1 R) lambda1))) (-.f64 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)))) (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) R)) (*.f64 lambda2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 1/2 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R (*.f64 (pow.f64 lambda1 3) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 R (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)))) (fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (*.f64 lambda2 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) R) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)) (pow.f64 lambda1 3))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)))) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)))) (*.f64 (neg.f64 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) 2)) (*.f64 (*.f64 lambda1 R) lambda1))) (-.f64 (fma.f64 1/2 (*.f64 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)))) (*.f64 (neg.f64 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) 2)) (pow.f64 lambda1 3)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) R)) (*.f64 lambda2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) 3))))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))))) (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) R)) (*.f64 lambda2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))))))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R)))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) 2)) (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))) (cos.f64 (*.f64 1/2 phi1))) (/.f64 R lambda1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R)))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2)) R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 lambda1 2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (fma.f64 1/2 (/.f64 lambda2 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 lambda1)) (*.f64 R (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) 2))))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) 2)) (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)))))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))) (/.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (/.f64 lambda2 (*.f64 lambda1 lambda1))) (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))) (cos.f64 (*.f64 1/2 phi1))) (/.f64 R lambda1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R)))
(*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))
(neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 lambda1 R)))
(+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))
(fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))))
(fma.f64 (neg.f64 (cos.f64 (*.f64 1/2 phi1))) (*.f64 lambda1 R) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R)))
(+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))))
(fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (fma.f64 -1/2 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) R)) (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)))))
(-.f64 (fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (*.f64 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))) (cos.f64 (*.f64 1/2 phi1))) (/.f64 R lambda1)) -1/2)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 lambda1 2)))) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))))
(fma.f64 -1/2 (*.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) (/.f64 (*.f64 R (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))) (*.f64 lambda1 lambda1))) (fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (fma.f64 -1/2 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) R)) (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))))))
(fma.f64 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))) (/.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (/.f64 lambda2 (*.f64 lambda1 lambda1))) -1/2 (-.f64 (fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (*.f64 (*.f64 (/.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))) (cos.f64 (*.f64 1/2 phi1))) (/.f64 R lambda1)) -1/2)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(fma.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))
(fma.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) 2)) (*.f64 R (*.f64 lambda2 lambda2)))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))
(-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) 2)) (*.f64 R (*.f64 lambda2 lambda2)))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2))))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) lambda1)))) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 (*.f64 (pow.f64 lambda2 3) R) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) 2))) lambda1)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (fma.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) 2)) (*.f64 R (*.f64 lambda2 lambda2)))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))) (*.f64 (/.f64 (pow.f64 lambda2 3) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2))) (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) R)) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) 2))))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) 2)) (*.f64 R (*.f64 lambda2 lambda2)))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2))))) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2))))))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R))
(+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))
(fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))))
(fma.f64 (neg.f64 (cos.f64 (*.f64 1/2 phi1))) (*.f64 lambda1 R) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))))
(fma.f64 1/2 (*.f64 (/.f64 R lambda2) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)))))
(fma.f64 1/2 (*.f64 (/.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))) (fma.f64 (neg.f64 (cos.f64 (*.f64 1/2 phi1))) (*.f64 lambda1 R) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) lambda1)) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))))
(fma.f64 1/2 (*.f64 (/.f64 R lambda2) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (fma.f64 1/2 (/.f64 (*.f64 R (*.f64 lambda1 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 lambda2))) (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))))))
(fma.f64 1/2 (*.f64 (/.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))) (-.f64 (fma.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R) (*.f64 (*.f64 1/2 (/.f64 (/.f64 R lambda2) lambda2)) (/.f64 lambda1 (/.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2))))))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))))
(*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))
(*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) (neg.f64 R))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R)))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) R) (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))))
(fma.f64 -1/2 (*.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) lambda2) (/.f64 R (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))))
(fma.f64 -1/2 (*.f64 (/.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) (*.f64 R lambda1)) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) R) (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1)))))
(fma.f64 -1/2 (*.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) (*.f64 lambda2 lambda2)) (/.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 -1/2 (*.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) lambda2) (/.f64 R (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)))))
(fma.f64 -1/2 (*.f64 (/.f64 (/.f64 R lambda2) lambda2) (/.f64 lambda1 (/.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))))) (fma.f64 -1/2 (*.f64 (/.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda2 R)))))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)
(*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 (*.f64 phi2 R))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))
(-.f64 (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 phi1 (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 phi2 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 (pow.f64 phi1 2) (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) R)))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 (*.f64 phi2 R))) (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 phi1)) (*.f64 R (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))))
(-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 phi2 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 (-.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4 1) (pow.f64 (*.f64 phi2 (neg.f64 (sqrt.f64 (/.f64 1 (fma.f64 phi2 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)) (*.f64 R (*.f64 phi1 phi1)))) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))) (*.f64 phi1 (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 phi2 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))) (*.f64 (pow.f64 phi1 3) (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) (*.f64 R phi2))))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 (pow.f64 phi1 2) (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) R)))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))))
(fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)) 3))) (pow.f64 phi1 3)) (*.f64 (*.f64 phi2 R) (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))))) (fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 (*.f64 phi2 R))) (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 phi1)) (*.f64 R (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))))
(fma.f64 1/2 (*.f64 (pow.f64 phi1 3) (*.f64 (*.f64 R (*.f64 (-.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4 1) (pow.f64 (*.f64 phi2 (neg.f64 (sqrt.f64 (/.f64 1 (fma.f64 phi2 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)) phi2)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 phi2 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 phi2 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 (-.f64 (fma.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4 1) (pow.f64 (*.f64 phi2 (neg.f64 (sqrt.f64 (/.f64 1 (fma.f64 phi2 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)) (*.f64 R (*.f64 phi1 phi1)))) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))) (*.f64 phi1 (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 phi2 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(*.f64 phi1 R)
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(fma.f64 -1 (*.f64 phi2 R) (*.f64 phi1 R))
(-.f64 (*.f64 phi1 R) (*.f64 phi2 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) R) phi1)) (*.f64 phi1 R)))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 1/2 (/.f64 (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (neg.f64 phi2) 2))) (/.f64 phi1 R)) (*.f64 phi1 R)))
(-.f64 (fma.f64 1/2 (*.f64 (/.f64 (-.f64 (fma.f64 phi2 phi2 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)) (*.f64 phi2 phi2)) phi1) R) (*.f64 phi1 R)) (*.f64 phi2 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) (*.f64 R phi2)) (pow.f64 phi1 2))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) R) phi1)) (*.f64 phi1 R))))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 1/2 (/.f64 (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (neg.f64 phi2) 2))) (/.f64 (*.f64 phi1 phi1) (*.f64 phi2 R))) (fma.f64 1/2 (/.f64 (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (neg.f64 phi2) 2))) (/.f64 phi1 R)) (*.f64 phi1 R))))
(-.f64 (fma.f64 1/2 (*.f64 (*.f64 (/.f64 (-.f64 (fma.f64 phi2 phi2 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)) (*.f64 phi2 phi2)) phi1) R) (/.f64 phi2 phi1)) (fma.f64 1/2 (*.f64 (/.f64 (-.f64 (fma.f64 phi2 phi2 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)) (*.f64 phi2 phi2)) phi1) R) (*.f64 phi1 R))) (*.f64 phi2 R))
(*.f64 -1 (*.f64 phi1 R))
(*.f64 (neg.f64 phi1) R)
(*.f64 phi1 (neg.f64 R))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(fma.f64 R phi2 (*.f64 (neg.f64 phi1) R))
(*.f64 R (+.f64 phi2 (neg.f64 phi1)))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))))
(fma.f64 R phi2 (fma.f64 -1 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 R (/.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(fma.f64 phi2 R (fma.f64 -1/2 (*.f64 (/.f64 R phi1) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)) (*.f64 phi1 (neg.f64 R))))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi1 2))) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))))
(fma.f64 R phi2 (fma.f64 -1 (*.f64 phi1 R) (*.f64 -1/2 (+.f64 (/.f64 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) phi2)) (*.f64 phi1 phi1)) (/.f64 R (/.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 phi2 R (fma.f64 -1/2 (+.f64 (*.f64 (/.f64 R phi1) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)) (*.f64 (/.f64 R (*.f64 phi1 phi1)) (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) phi2))) (*.f64 phi1 (neg.f64 R))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R)
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))
(*.f64 R (sqrt.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 phi1 (*.f64 R phi2)))))
(fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (neg.f64 (*.f64 (*.f64 phi1 (*.f64 phi2 R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))))
(-.f64 (*.f64 R (sqrt.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)))) (*.f64 phi1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)))) (*.f64 phi2 R))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 R (pow.f64 phi2 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 phi1 (*.f64 R phi2))))))
(fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (fma.f64 1/2 (*.f64 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 (*.f64 R (*.f64 phi2 phi2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (neg.f64 (*.f64 (*.f64 phi1 (*.f64 phi2 R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))
(-.f64 (fma.f64 R (sqrt.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2))) (*.f64 (-.f64 1 (pow.f64 (*.f64 phi1 (neg.f64 (sqrt.f64 (/.f64 1 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)))))) 2)) (*.f64 (*.f64 R (*.f64 (*.f64 phi2 phi2) (sqrt.f64 (/.f64 1 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)))))) 1/2))) (*.f64 phi1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)))) (*.f64 phi2 R))))
(+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (/.f64 (*.f64 phi1 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) phi1)) 2)) (*.f64 R (pow.f64 phi2 3)))) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 R (pow.f64 phi2 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 phi1 (*.f64 R phi2)))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (/.f64 (*.f64 (*.f64 phi1 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2))) (*.f64 R (pow.f64 phi2 3))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (fma.f64 1/2 (*.f64 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 (*.f64 R (*.f64 phi2 phi2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (neg.f64 (*.f64 (*.f64 phi1 (*.f64 phi2 R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))))))
(fma.f64 1/2 (/.f64 (*.f64 phi1 (sqrt.f64 (/.f64 1 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2))))) (/.f64 (/.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)) (-.f64 1 (pow.f64 (*.f64 phi1 (neg.f64 (sqrt.f64 (/.f64 1 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)))))) 2))) (*.f64 R (pow.f64 phi2 3)))) (-.f64 (fma.f64 R (sqrt.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2))) (*.f64 (-.f64 1 (pow.f64 (*.f64 phi1 (neg.f64 (sqrt.f64 (/.f64 1 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)))))) 2)) (*.f64 (*.f64 R (*.f64 (*.f64 phi2 phi2) (sqrt.f64 (/.f64 1 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)))))) 1/2))) (*.f64 phi1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)))) (*.f64 phi2 R)))))
(*.f64 R phi2)
(*.f64 phi2 R)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(fma.f64 R phi2 (*.f64 (neg.f64 phi1) R))
(*.f64 R (+.f64 phi2 (neg.f64 phi1)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2)) R) phi2)) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2)))
(fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2)) (/.f64 phi2 R)) (fma.f64 R phi2 (*.f64 (neg.f64 phi1) R)))
(fma.f64 1/2 (/.f64 (-.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)) (*.f64 phi1 phi1)) (/.f64 phi2 R)) (*.f64 R (+.f64 phi2 (neg.f64 phi1))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2)) R) phi2)) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (*.f64 1/2 (/.f64 (*.f64 phi1 (*.f64 (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2)) R)) (pow.f64 phi2 2))))))
(fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2)) (/.f64 phi2 R)) (fma.f64 -1 (*.f64 phi1 R) (fma.f64 R phi2 (*.f64 1/2 (/.f64 phi1 (/.f64 (*.f64 phi2 phi2) (*.f64 R (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)) (*.f64 phi1 phi1)) (/.f64 phi2 R)) (-.f64 (fma.f64 1/2 (*.f64 (/.f64 (-.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2)) (*.f64 phi1 phi1)) (/.f64 phi2 R)) (/.f64 phi1 phi2)) (*.f64 phi2 R)) (*.f64 phi1 R)))
(*.f64 -1 (*.f64 R phi2))
(neg.f64 (*.f64 phi2 R))
(*.f64 R (neg.f64 phi2))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(fma.f64 -1 (*.f64 phi2 R) (*.f64 phi1 R))
(-.f64 (*.f64 phi1 R) (*.f64 phi2 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2)) (*.f64 phi1 R)))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 -1/2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (/.f64 phi2 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) R))) (*.f64 phi1 R)))
(-.f64 (fma.f64 phi1 R (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) R) phi2))) (*.f64 phi2 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 phi1 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi2 2))))))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 -1/2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (/.f64 phi2 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) R))) (fma.f64 phi1 R (*.f64 -1/2 (/.f64 (*.f64 (*.f64 phi1 R) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 phi2))))))
(-.f64 (fma.f64 -1/2 (/.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) R) phi2) (fma.f64 phi1 R (/.f64 -1/2 (/.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2) (*.f64 phi1 R)))))) (*.f64 phi2 R))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (neg.f64 lambda2) 1 lambda2)))
(fma.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (neg.f64 lambda2) lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (-.f64 lambda1 lambda2) (*.f64 0 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(fma.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (-.f64 lambda1 lambda2) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(fma.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (-.f64 lambda1 lambda2) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (neg.f64 lambda2) 1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 phi1))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))) (*.f64 lambda1 (cos.f64 (*.f64 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) (*.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 1 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1)))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))) 1)
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(/.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 1 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (+.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 phi1))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 lambda1 (neg.f64 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (neg.f64 (+.f64 lambda2 lambda1)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1 (/.f64 (/.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 1 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 1 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (/.f64 (sqrt.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (/.f64 (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (/.f64 (cbrt.f64 (+.f64 lambda2 lambda1)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (/.f64 (cbrt.f64 (+.f64 lambda2 lambda1)) (cbrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (/.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cbrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (cos.f64 (*.f64 1/2 phi1))) (-.f64 lambda1 (neg.f64 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 1/2 phi1))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (neg.f64 (+.f64 lambda2 lambda1)) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1 (/.f64 (/.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 1/2 phi1))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (/.f64 (sqrt.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (/.f64 (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) 1) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) 1)
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(pow.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) 2)
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) 3)
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(pow.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) 3) 1/3)
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) 2))
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) 2))
(fabs.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))
(log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) 3))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(expm1.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) 1))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(log1p.f64 (expm1.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 3)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3) 1/3)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2))
(fabs.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) 3)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) 3) (pow.f64 R 3)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 1))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))

localize136.0ms (0.5%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
99.7%
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)
94.9%
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
88.5%
(/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1)
79.4%
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
Compiler

Compiled 139 to 70 computations (49.6% saved)

series54.0ms (0.2%)

Counts
3 → 168
Calls

42 calls:

TimeVariablePointExpression
24.0ms
lambda2
@inf
(/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1)
5.0ms
R
@0
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
1.0ms
phi1
@inf
(/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1)
1.0ms
phi1
@inf
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
1.0ms
phi2
@-inf
(/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1)

rewrite143.0ms (0.5%)

Algorithm
batch-egg-rewrite
Rules
1164×distribute-lft-in
524×associate-/r/
454×add-sqr-sqrt
440×*-un-lft-identity
438×pow1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
020135
1438135
25878135
Stop Event
node limit
Counts
3 → 119
Calls
Call 1
Inputs
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1)
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)
Outputs
(((+.f64 (*.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) (*.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((+.f64 (*.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((+.f64 (*.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (-.f64 lambda1 lambda2) 2)) 1/2) (*.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 1/2 (cos.f64 (*.f64 2 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((pow.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((pow.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((pow.f64 (pow.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((sqrt.f64 (*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4) (*.f64 1/4 (*.f64 R R)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((log.f64 (pow.f64 (exp.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 -1/2 R))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((cbrt.f64 (pow.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 -1/2 R) 3) (pow.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((cbrt.f64 (*.f64 (pow.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3) (pow.f64 (*.f64 -1/2 R) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((expm1.f64 (log1p.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((exp.f64 (log.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((log1p.f64 (expm1.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)))
(((-.f64 (exp.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 1 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 -1/2 (/.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (*.f64 -1/2 R) (*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (/.f64 1 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (*.f64 -1/2 R) (*.f64 (/.f64 1 phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (*.f64 -1/2 R) (/.f64 1 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 1 phi1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 1 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (sqrt.f64 phi1)) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (sqrt.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (/.f64 1 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (pow.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) (*.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 1 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 1 phi1) (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (*.f64 1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 1 (neg.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 1 (sqrt.f64 phi1)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (sqrt.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 1 (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (cbrt.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) phi1) (*.f64 -1/2 R)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (sqrt.f64 phi1)) (/.f64 (*.f64 -1/2 R) (sqrt.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (*.f64 (/.f64 1 phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 -1/2 R)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 1 (neg.f64 phi1)) (*.f64 1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 -1/2 (sqrt.f64 phi1)) (/.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (sqrt.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 -1/2 (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (cbrt.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 -1/2 R) 1) (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) phi1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 -1/2 R) (sqrt.f64 phi1)) (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (sqrt.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 -1/2 R) (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (cbrt.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) (/.f64 (*.f64 -1/2 R) phi1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 -1/2 R) (cbrt.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) 1) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) phi1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (cbrt.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) 1) (/.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) phi1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) (sqrt.f64 phi1)) (/.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (sqrt.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) (pow.f64 (cbrt.f64 phi1) 2)) (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 -1/2 (/.f64 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 -1/2 phi1) (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 R (/.f64 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) -1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 -1/2 R) (neg.f64 phi1)) (neg.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 -1/2 R) (/.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 -1/2 R) (/.f64 phi1 1)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 -1/2 R) (/.f64 phi1 (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4)))) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (*.f64 -1/2 R) (/.f64 phi1 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 1 (/.f64 phi1 -1/2)) (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 1 (/.f64 phi1 (*.f64 -1/2 R))) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 1 (/.f64 phi1 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 1 (/.f64 phi1 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2))) (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (sqrt.f64 (*.f64 -1/2 R)) (/.f64 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (sqrt.f64 (*.f64 -1/2 R))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 -1/2 R)) 2) (/.f64 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cbrt.f64 (*.f64 -1/2 R))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) phi1) (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((pow.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (sqrt.f64 phi1)) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((pow.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((pow.f64 (pow.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((pow.f64 (/.f64 (/.f64 phi1 (*.f64 -1/2 R)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((neg.f64 (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (neg.f64 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((sqrt.f64 (pow.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((log.f64 (exp.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((cbrt.f64 (pow.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((cbrt.f64 (/.f64 (pow.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3) (pow.f64 phi1 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((expm1.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((exp.f64 (log.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((log1p.f64 (expm1.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)))
(((+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 (neg.f64 lambda2) 1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((+.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) 1/2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 1/2 (cos.f64 (*.f64 2 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (-.f64 lambda1 lambda2) lambda1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (-.f64 lambda1 lambda2) (neg.f64 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (neg.f64 lambda2) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (neg.f64 lambda2) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2)) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((-.f64 (exp.f64 (log1p.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (*.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4)) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((log.f64 (exp.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((cbrt.f64 (pow.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((exp.f64 (*.f64 2 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((exp.f64 (*.f64 (*.f64 2 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #f)))

simplify246.0ms (0.9%)

Algorithm
egg-herbie
Rules
980×associate-+r+
932×*-commutative
756×associate-+l+
710×+-commutative
682×fma-def
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
051120631
1152120015
2510519631
Stop Event
node limit
Counts
287 → 280
Calls
Call 1
Inputs
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 (*.f64 -1/2 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 R (*.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 R (*.f64 (pow.f64 phi2 3) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 (*.f64 -1/2 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 R (*.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(+.f64 (*.f64 1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))
(+.f64 (*.f64 1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (+.f64 (*.f64 -1/2 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))) (*.f64 (pow.f64 phi1 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))
(+.f64 (*.f64 1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (+.f64 (*.f64 -1/2 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))) (*.f64 (pow.f64 phi1 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -1/2 (*.f64 (+.f64 (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))) (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (pow.f64 phi1 3) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 R (*.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi1)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 R (*.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi1)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) phi1)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 R (*.f64 (pow.f64 phi2 3) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(+.f64 (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))
(+.f64 (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)) (*.f64 -1/2 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))) (*.f64 phi1 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)) (+.f64 (*.f64 -1/2 (*.f64 (+.f64 (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))) (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (pow.f64 phi1 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 -1/2 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))) (*.f64 phi1 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))
(+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 phi2 3)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(+.f64 (*.f64 -1 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))
(+.f64 (*.f64 -1 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(+.f64 (*.f64 -1 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(+.f64 (*.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) (*.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (-.f64 lambda1 lambda2) 2)) 1/2) (*.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 1/2 (cos.f64 (*.f64 2 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) 1)
(pow.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 1)
(pow.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) 2)
(pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 3)
(pow.f64 (pow.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3) 1/3)
(sqrt.f64 (*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4) (*.f64 1/4 (*.f64 R R))))
(log.f64 (pow.f64 (exp.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 -1/2 R)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))
(cbrt.f64 (pow.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 -1/2 R) 3) (pow.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3)))
(cbrt.f64 (*.f64 (pow.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3) (pow.f64 (*.f64 -1/2 R) 3)))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(exp.f64 (log.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 1))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) 1)
(*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 1 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1))
(*.f64 (*.f64 -1/2 R) (*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (/.f64 1 phi1)))
(*.f64 (*.f64 -1/2 R) (*.f64 (/.f64 1 phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (*.f64 -1/2 R) (/.f64 1 phi1)))
(*.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 1 phi1))
(*.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 1)
(*.f64 1 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (sqrt.f64 phi1)) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (sqrt.f64 phi1)))
(*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (/.f64 1 phi1)))
(*.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (pow.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) (*.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 1 phi1)))
(*.f64 (/.f64 1 phi1) (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (*.f64 1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 1 (neg.f64 phi1)))
(*.f64 (/.f64 1 (sqrt.f64 phi1)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (sqrt.f64 phi1)))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (cbrt.f64 phi1)))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) phi1) (*.f64 -1/2 R))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (sqrt.f64 phi1)) (/.f64 (*.f64 -1/2 R) (sqrt.f64 phi1)))
(*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(*.f64 (*.f64 (/.f64 1 phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 -1/2 R))
(*.f64 (/.f64 1 (neg.f64 phi1)) (*.f64 1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (/.f64 -1/2 (sqrt.f64 phi1)) (/.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (sqrt.f64 phi1)))
(*.f64 (/.f64 -1/2 (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (cbrt.f64 phi1)))
(*.f64 (/.f64 (*.f64 -1/2 R) 1) (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) phi1))
(*.f64 (/.f64 (*.f64 -1/2 R) (sqrt.f64 phi1)) (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (sqrt.f64 phi1)))
(*.f64 (/.f64 (*.f64 -1/2 R) (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (cbrt.f64 phi1)))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) (/.f64 (*.f64 -1/2 R) phi1))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 -1/2 R) (cbrt.f64 phi1)))
(*.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) 1) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) phi1))
(*.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))))
(*.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (cbrt.f64 phi1)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) 1) (/.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) phi1))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) (sqrt.f64 phi1)) (/.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (sqrt.f64 phi1)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) (pow.f64 (cbrt.f64 phi1) 2)) (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (/.f64 -1/2 (/.f64 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (/.f64 -1/2 phi1) (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (/.f64 R (/.f64 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) -1/2)
(*.f64 (/.f64 (*.f64 -1/2 R) (neg.f64 phi1)) (neg.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (/.f64 (*.f64 -1/2 R) (/.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (/.f64 (*.f64 -1/2 R) (/.f64 phi1 1)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(*.f64 (/.f64 (*.f64 -1/2 R) (/.f64 phi1 (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4)))) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))
(*.f64 (/.f64 (*.f64 -1/2 R) (/.f64 phi1 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(*.f64 (/.f64 1 (/.f64 phi1 -1/2)) (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (/.f64 1 (/.f64 phi1 (*.f64 -1/2 R))) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(*.f64 (/.f64 1 (/.f64 phi1 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))))
(*.f64 (/.f64 1 (/.f64 phi1 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2))) (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 -1/2 R)) (/.f64 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (sqrt.f64 (*.f64 -1/2 R)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 -1/2 R)) 2) (/.f64 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cbrt.f64 (*.f64 -1/2 R)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) phi1) (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(pow.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 1)
(pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (sqrt.f64 phi1)) 2)
(pow.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 3)
(pow.f64 (pow.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3) 1/3)
(pow.f64 (/.f64 (/.f64 phi1 (*.f64 -1/2 R)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) -1)
(neg.f64 (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (neg.f64 phi1)))
(sqrt.f64 (pow.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 2))
(log.f64 (exp.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))
(cbrt.f64 (pow.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3))
(cbrt.f64 (/.f64 (pow.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3) (pow.f64 phi1 3)))
(expm1.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(exp.f64 (log.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 1))
(log1p.f64 (expm1.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 (neg.f64 lambda2) 1 lambda2)))
(+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) 1/2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 1/2 (cos.f64 (*.f64 2 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (-.f64 lambda1 lambda2) lambda1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (-.f64 lambda1 lambda2) (neg.f64 lambda2))))
(+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (neg.f64 lambda2) (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2)))
(+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (neg.f64 lambda2) 1)))
(+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2)) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1))
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 1)
(*.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1)
(*.f64 1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(*.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (*.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4)) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4))
(log.f64 (exp.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(log.f64 (+.f64 1 (expm1.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(cbrt.f64 (pow.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3))
(expm1.f64 (log1p.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(exp.f64 (*.f64 2 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(exp.f64 (*.f64 (*.f64 2 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1))
(log1p.f64 (expm1.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
Outputs
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(*.f64 (*.f64 -1/2 (*.f64 lambda2 lambda2)) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2))))
(+.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2))))
(+.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))))
(*.f64 (*.f64 -1/2 R) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(*.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 -1/2 R))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))
(fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2))))
(+.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2))))
(+.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))))
(*.f64 (*.f64 -1/2 R) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(*.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 -1/2 R))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))
(fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2))))
(+.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2))))
(+.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))))
(*.f64 (*.f64 -1/2 R) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(*.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 -1/2 R))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))
(fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2))))
(+.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2))))
(+.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))
(*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(*.f64 (*.f64 -1/2 (*.f64 lambda2 lambda2)) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2))))
(+.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2))))
(+.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))
(*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(*.f64 (*.f64 -1/2 (*.f64 lambda2 lambda2)) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2))))
(+.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))))
(fma.f64 -1/2 (*.f64 (*.f64 lambda2 lambda2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(fma.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) (fma.f64 -1/2 (*.f64 R (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2))))
(+.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (*.f64 R lambda2)) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 (*.f64 -1/2 R) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))
(*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/2 R))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(fma.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 phi1))) (*.f64 (*.f64 R phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))))
(fma.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))) (*.f64 R phi2)) (*.f64 1/2 (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 (*.f64 -1/2 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 R (*.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (fma.f64 -1/2 (*.f64 (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) -1/4)) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 phi1))) (*.f64 (*.f64 R phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))))
(fma.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (fma.f64 -1/2 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) -1/4 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))) (*.f64 R phi2)) (*.f64 1/2 (cos.f64 (*.f64 1/2 phi1))))))
(+.f64 (*.f64 -1/2 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 R (*.f64 (pow.f64 phi2 3) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 (*.f64 -1/2 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 R (*.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) 1/6) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 phi2 3)))) (fma.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (fma.f64 -1/2 (*.f64 (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) -1/4)) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 phi1))) (*.f64 (*.f64 R phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))))))
(fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) 1/6) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 R (pow.f64 phi2 3)))) (fma.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (fma.f64 -1/2 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) -1/4 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))) (*.f64 R phi2)) (*.f64 1/2 (cos.f64 (*.f64 1/2 phi1)))))))
(+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))) (*.f64 R phi2)) (*.f64 1/2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1/2 (+.f64 (+.f64 (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) 1/6)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 R (pow.f64 phi2 3))))) (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) -1/4 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))
(*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/2 R))
(+.f64 (*.f64 1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))
(fma.f64 1/2 (*.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(fma.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) (*.f64 1/2 (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 R (cos.f64 (*.f64 1/2 phi2)))) (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (+.f64 (*.f64 -1/2 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))) (*.f64 (pow.f64 phi1 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))
(fma.f64 1/2 (*.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (+.f64 (*.f64 (fma.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))) (*.f64 (*.f64 (*.f64 phi1 phi1) R) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))
(fma.f64 -1/2 (fma.f64 (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))) (*.f64 1/2 (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 R (cos.f64 (*.f64 1/2 phi2)))) (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (+.f64 (*.f64 -1/2 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))) (*.f64 (pow.f64 phi1 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -1/2 (*.f64 (+.f64 (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))) (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (pow.f64 phi1 3) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 1/2 (*.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (cos.f64 (*.f64 1/2 phi2))))) (fma.f64 -1/2 (*.f64 (fma.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))) (*.f64 (*.f64 (*.f64 phi1 phi1) R) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/2 (+.f64 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))) 1/6) (*.f64 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 3)))))))
(fma.f64 1/2 (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 R (cos.f64 (*.f64 1/2 phi2)))) (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))) (*.f64 -1/2 (+.f64 (*.f64 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) (*.f64 phi1 phi1))) (fma.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))) 1/6) (pow.f64 phi1 3)))))))
(fma.f64 1/2 (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 R (cos.f64 (*.f64 1/2 phi2)))) (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))) (*.f64 -1/2 (+.f64 (*.f64 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) (*.f64 phi1 phi1))) (fma.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) 1/6)) (pow.f64 phi1 3)))))))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))
(/.f64 (*.f64 (*.f64 -1/2 (*.f64 lambda2 lambda2)) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)))
(+.f64 (/.f64 (*.f64 (*.f64 -1/2 (*.f64 lambda2 lambda2)) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))
(fma.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 phi1 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 phi1 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))
(/.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)
(/.f64 (*.f64 -1/2 R) (/.f64 (/.f64 phi1 (*.f64 lambda1 lambda1)) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (/.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))
(fma.f64 -1/2 (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 phi1 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 phi1 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))
(/.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)
(/.f64 (*.f64 -1/2 R) (/.f64 (/.f64 phi1 (*.f64 lambda1 lambda1)) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (/.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))
(fma.f64 -1/2 (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 phi1 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 phi1 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))
(/.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)
(/.f64 (*.f64 -1/2 R) (/.f64 (/.f64 phi1 (*.f64 lambda1 lambda1)) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (/.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))
(fma.f64 -1/2 (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 phi1 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1))))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 phi1 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))
(/.f64 (*.f64 (*.f64 -1/2 (*.f64 lambda2 lambda2)) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)))
(+.f64 (/.f64 (*.f64 (*.f64 -1/2 (*.f64 lambda2 lambda2)) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))
(fma.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 phi1 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 phi1 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))
(/.f64 (*.f64 (*.f64 -1/2 (*.f64 lambda2 lambda2)) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1)))
(+.f64 (/.f64 (*.f64 (*.f64 -1/2 (*.f64 lambda2 lambda2)) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))
(fma.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 phi1 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(+.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) phi1) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1))))
(+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) phi1) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 phi1 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 R (*.f64 lambda2 lambda2))) phi1) (*.f64 (/.f64 R phi1) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 (/.f64 lambda2 phi1) (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(/.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) phi1)
(/.f64 (*.f64 -1/2 R) (/.f64 (/.f64 phi1 (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))
(fma.f64 1/2 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (/.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) phi1))
(fma.f64 1/2 (*.f64 (/.f64 R phi1) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (/.f64 (*.f64 -1/2 R) (/.f64 (/.f64 phi1 (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 R (*.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi1)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) -1/4)) (/.f64 phi1 (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) (fma.f64 1/2 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (/.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) phi1)))
(fma.f64 -1/2 (*.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) -1/4 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) phi1) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (fma.f64 1/2 (*.f64 (/.f64 R phi1) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (/.f64 (*.f64 -1/2 R) (/.f64 (/.f64 phi1 (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 R (*.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi1)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) phi1)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 R (*.f64 (pow.f64 phi2 3) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi1)) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) -1/4)) (/.f64 phi1 (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) (fma.f64 1/2 (/.f64 R (/.f64 phi1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (*.f64 -1/2 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) 1/6) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 phi2 3)))) phi1) (/.f64 R (/.f64 phi1 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))))))
(fma.f64 -1/2 (*.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) -1/4 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) phi1) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (fma.f64 -1/2 (+.f64 (*.f64 (/.f64 R phi1) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (/.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (/.f64 (/.f64 phi1 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 R (pow.f64 phi2 3)))) 1/6))) (*.f64 1/2 (*.f64 (/.f64 R phi1) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 -1/2 (/.f64 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) phi1))
(/.f64 (*.f64 -1/2 R) (/.f64 (/.f64 phi1 (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))
(+.f64 (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))
(fma.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (/.f64 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) phi1)))
(fma.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 R (cos.f64 (*.f64 1/2 phi2)))) (/.f64 (*.f64 -1/2 R) (/.f64 (/.f64 phi1 (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))))
(+.f64 (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)) (*.f64 -1/2 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))) (*.f64 phi1 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(fma.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (+.f64 (/.f64 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) phi1) (*.f64 (fma.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))) (*.f64 phi1 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(fma.f64 -1/2 (+.f64 (/.f64 R (/.f64 (/.f64 phi1 (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) (*.f64 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi1 (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))))) (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 R (cos.f64 (*.f64 1/2 phi2)))))))
(+.f64 (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)) (+.f64 (*.f64 -1/2 (*.f64 (+.f64 (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))) (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (pow.f64 phi1 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 -1/2 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))) (*.f64 phi1 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (cos.f64 (*.f64 1/2 phi2))))) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2)) phi1) (*.f64 -1/2 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 phi1 phi1) R) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))) 1/6)) (*.f64 (fma.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))) (*.f64 phi1 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 R (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 (/.f64 phi1 (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) (*.f64 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2)) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))) 1/6)) (*.f64 phi1 (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))))))))
(fma.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 R (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (+.f64 (/.f64 R (/.f64 (/.f64 phi1 (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) (*.f64 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2)) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) 1/6))) (*.f64 phi1 (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))))))))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))
(*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))
(*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))
(*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2))
(*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))
(*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))
(*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))))
(+.f64 (*.f64 -2 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda2 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(fma.f64 -2 (*.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))
(+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))
(fma.f64 -1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(fma.f64 -1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (*.f64 phi2 phi2) (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) -1/4)))))
(-.f64 (fma.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) -1/4 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 phi2 3)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) 1/6) (pow.f64 phi2 3) (fma.f64 -1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (*.f64 phi2 phi2) (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) -1/4))))))
(fma.f64 (pow.f64 phi2 3) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) 1/6) (-.f64 (fma.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) -1/4 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))))
(fma.f64 (pow.f64 phi2 3) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) 1/6)) (-.f64 (fma.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) -1/4 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))
(+.f64 (*.f64 -1 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))
(fma.f64 -1 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))
(-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 phi1 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(fma.f64 -1 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (cos.f64 (*.f64 1/2 phi2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (*.f64 phi1 phi1) (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))))))
(-.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) (*.f64 phi1 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 -1 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (cos.f64 (*.f64 1/2 phi2))))) (fma.f64 (pow.f64 phi1 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (cos.f64 (*.f64 1/2 phi2)))) 1/6) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (*.f64 phi1 phi1) (fma.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (*.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))))))))
(-.f64 (fma.f64 (pow.f64 phi1 3) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2)))) 1/6) (fma.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))) (*.f64 phi1 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))))))
(-.f64 (fma.f64 (pow.f64 phi1 3) (*.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (cos.f64 (*.f64 1/2 phi2))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) 1/6)) (fma.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (fma.f64 1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)))) (*.f64 phi1 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))))))
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(+.f64 (*.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) (*.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(+.f64 (*.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 (*.f64 -1/2 R) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(+.f64 (*.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (-.f64 lambda1 lambda2) 2)) 1/2) (*.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 1/2 (cos.f64 (*.f64 2 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 (*.f64 -1/2 (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 1 (+.f64 phi1 phi2))))))
(*.f64 (*.f64 -1/2 R) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi1 phi2))))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) 1) (*.f64 1/2 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 -1/2 R))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) 1)
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(pow.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 1)
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(pow.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) 2)
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 3)
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(pow.f64 (pow.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3) 1/3)
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(sqrt.f64 (*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4) (*.f64 1/4 (*.f64 R R))))
(sqrt.f64 (*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4) (*.f64 (*.f64 1/4 R) R)))
(sqrt.f64 (*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4) (*.f64 R (*.f64 R 1/4))))
(log.f64 (pow.f64 (exp.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 -1/2 R)))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(cbrt.f64 (pow.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 -1/2 R) 3) (pow.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3)))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(cbrt.f64 (*.f64 (pow.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3) (pow.f64 (*.f64 -1/2 R) 3)))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(exp.f64 (log.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 1))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) 1)
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (*.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 1 phi1)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 -1/2 (/.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (*.f64 -1/2 R) (*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (/.f64 1 phi1)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (*.f64 -1/2 R) (*.f64 (/.f64 1 phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (*.f64 -1/2 R) (/.f64 1 phi1)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 1 phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 1)
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 1 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (sqrt.f64 phi1)) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (sqrt.f64 phi1)))
(pow.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R)))) 2)
(pow.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)
(*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (/.f64 1 phi1)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (pow.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) (*.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 1 phi1)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 1 phi1) (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (*.f64 1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 1 (neg.f64 phi1)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 1 (sqrt.f64 phi1)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (sqrt.f64 phi1)))
(pow.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R)))) 2)
(pow.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (cbrt.f64 phi1)))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 -1/2 R) (/.f64 (cbrt.f64 phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (pow.f64 (cbrt.f64 phi1) 2)) (*.f64 (/.f64 -1/2 (cbrt.f64 phi1)) R))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) phi1) (*.f64 -1/2 R))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (sqrt.f64 phi1)) (/.f64 (*.f64 -1/2 R) (sqrt.f64 phi1)))
(pow.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R)))) 2)
(pow.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)
(*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (*.f64 (/.f64 1 phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 -1/2 R))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 1 (neg.f64 phi1)) (*.f64 1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 -1/2 (sqrt.f64 phi1)) (/.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (sqrt.f64 phi1)))
(pow.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R)))) 2)
(pow.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)
(*.f64 (/.f64 -1/2 (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (cbrt.f64 phi1)))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 -1/2 R) (/.f64 (cbrt.f64 phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (pow.f64 (cbrt.f64 phi1) 2)) (*.f64 (/.f64 -1/2 (cbrt.f64 phi1)) R))
(*.f64 (/.f64 (*.f64 -1/2 R) 1) (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (*.f64 -1/2 R) (sqrt.f64 phi1)) (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (sqrt.f64 phi1)))
(pow.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R)))) 2)
(pow.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)
(*.f64 (/.f64 (*.f64 -1/2 R) (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (cbrt.f64 phi1)))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 -1/2 R) (/.f64 (cbrt.f64 phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (pow.f64 (cbrt.f64 phi1) 2)) (*.f64 (/.f64 -1/2 (cbrt.f64 phi1)) R))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) (/.f64 (*.f64 -1/2 R) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 -1/2 R) (cbrt.f64 phi1)))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 -1/2 R) (/.f64 (cbrt.f64 phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (pow.f64 (cbrt.f64 phi1) 2)) (*.f64 (/.f64 -1/2 (cbrt.f64 phi1)) R))
(*.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) 1) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (cbrt.f64 phi1)))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 phi1) 2)) (/.f64 (*.f64 -1/2 R) (/.f64 (cbrt.f64 phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (pow.f64 (cbrt.f64 phi1) 2)) (*.f64 (/.f64 -1/2 (cbrt.f64 phi1)) R))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) 1) (/.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) phi1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) (sqrt.f64 phi1)) (/.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (sqrt.f64 phi1)))
(pow.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R)))) 2)
(pow.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) (pow.f64 (cbrt.f64 phi1) 2)) (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))) (/.f64 (pow.f64 (cbrt.f64 (*.f64 -1/2 (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) 2) (pow.f64 (cbrt.f64 phi1) 2)))
(*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))) (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) 2) (pow.f64 (cbrt.f64 phi1) 2)))
(*.f64 (/.f64 -1/2 (/.f64 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) R)
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 -1/2 phi1) (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 R (/.f64 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) -1/2)
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (*.f64 -1/2 R) (neg.f64 phi1)) (neg.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (*.f64 -1/2 R) (/.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (*.f64 -1/2 R) (/.f64 phi1 1)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (*.f64 -1/2 R) (/.f64 phi1 (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4)))) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))
(*.f64 (*.f64 (/.f64 -1/2 (/.f64 phi1 R)) (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4))) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2))
(*.f64 (*.f64 (*.f64 R (/.f64 -1/2 phi1)) (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4))) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2))
(*.f64 (/.f64 (*.f64 -1/2 R) (/.f64 phi1 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 1 (/.f64 phi1 -1/2)) (*.f64 R (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 1 (/.f64 phi1 (*.f64 -1/2 R))) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 1 (/.f64 phi1 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 1 (/.f64 phi1 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2))) (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 -1/2 R)) (/.f64 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (sqrt.f64 (*.f64 -1/2 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 -1/2 R)) 2) (/.f64 phi1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cbrt.f64 (*.f64 -1/2 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 2) phi1) (cbrt.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(pow.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 1)
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 -1/2 R))) (sqrt.f64 phi1)) 2)
(pow.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R)))) 2)
(pow.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 (/.f64 (sqrt.f64 phi1) (sqrt.f64 (*.f64 -1/2 R))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)
(pow.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 3)
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(pow.f64 (pow.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3) 1/3)
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(pow.f64 (/.f64 (/.f64 phi1 (*.f64 -1/2 R)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) -1)
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(neg.f64 (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (neg.f64 phi1)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(sqrt.f64 (pow.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 2))
(sqrt.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R))) 2))
(fabs.f64 (*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1))))
(log.f64 (exp.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(cbrt.f64 (pow.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(cbrt.f64 (/.f64 (pow.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 3) (pow.f64 phi1 3)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(expm1.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(exp.f64 (log.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 1))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(log1p.f64 (expm1.f64 (*.f64 (/.f64 (*.f64 -1/2 R) phi1) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1/2 (/.f64 phi1 R)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 R (/.f64 -1/2 phi1)))
(+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 (neg.f64 lambda2) 1 lambda2)))
(+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (neg.f64 lambda2) lambda2)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (-.f64 lambda1 lambda2) (*.f64 0 lambda2)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (-.f64 lambda1 lambda2) (-.f64 lambda2 lambda2)))
(+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (-.f64 lambda1 lambda2) (fma.f64 (neg.f64 (sqrt.f64 lambda2)) (sqrt.f64 lambda2) lambda2)))
(+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (+.f64 (-.f64 lambda1 lambda2) (fma.f64 (neg.f64 (cbrt.f64 lambda2)) (pow.f64 (cbrt.f64 lambda2) 2) lambda2)))
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) lambda1)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(+.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) 1/2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 1/2 (cos.f64 (*.f64 2 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 1 (+.f64 phi1 phi2))))))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (-.f64 lambda1 lambda2) lambda1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (-.f64 lambda1 lambda2) (neg.f64 lambda2))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (neg.f64 lambda2) (-.f64 lambda1 lambda2))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2)))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (neg.f64 lambda2) 1)))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2)) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) lambda1))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 1)
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1)
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 1 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4)))
(*.f64 (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4)) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (*.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4)) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))
(*.f64 (cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4)) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 lambda1 lambda2))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 4))
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4))
(log.f64 (exp.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(log.f64 (+.f64 1 (expm1.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(cbrt.f64 (pow.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(expm1.f64 (log1p.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(exp.f64 (*.f64 2 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(exp.f64 (*.f64 (*.f64 2 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)
(log1p.f64 (expm1.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)

localize44.0ms (0.2%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
99.7%
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))
98.9%
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
97.8%
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
94.9%
(cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))
Compiler

Compiled 108 to 46 computations (57.4% saved)

series1.9s (6.7%)

Counts
3 → 80
Calls

42 calls:

TimeVariablePointExpression
1.7s
phi2
@0
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
19.0ms
lambda1
@-inf
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
17.0ms
lambda1
@inf
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
16.0ms
phi1
@0
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
13.0ms
lambda2
@-inf
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)

rewrite139.0ms (0.5%)

Algorithm
batch-egg-rewrite
Rules
1644×associate-*l/
778×associate-/r*
424×add-sqr-sqrt
410×*-un-lft-identity
406×pow1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
020127
1428127
25272127
Stop Event
node limit
Counts
3 → 106
Calls
Call 1
Inputs
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))
Outputs
(((-.f64 (exp.f64 (log1p.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 1 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) (pow.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) 1/3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2) (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (cbrt.f64 R)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (cbrt.f64 R) (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) 1/3) (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 1 1/3) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1/3) (pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1/3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((log.f64 (exp.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((expm1.f64 (log1p.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (log.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (*.f64 (log.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1/3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((log1p.f64 (expm1.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) R) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 1 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) (*.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (*.f64 (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) R)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (sqrt.f64 R) (*.f64 (sqrt.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2) (*.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2) (*.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) R)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (cbrt.f64 R) (*.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (cbrt.f64 R) 2) (*.f64 (cbrt.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (*.f64 R (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (*.f64 R (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2)) (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (*.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) (sqrt.f64 R)) (sqrt.f64 R)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (*.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) (pow.f64 (cbrt.f64 R) 2)) (cbrt.f64 R)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) 1) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6)) (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2)) (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (cbrt.f64 R)) (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) 3) (pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((*.f64 (pow.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2) 3) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3) (pow.f64 R 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)))
(((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) #f)))

simplify321.0ms (1.1%)

Algorithm
egg-herbie
Rules
942×*-commutative
708×distribute-lft-in
706×distribute-rgt-in
552×sqr-pow
532×+-commutative
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0103356340
1348154510
Stop Event
node limit
Counts
186 → 250
Calls
Call 1
Inputs
(*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (pow.f64 R 1/3)))
(+.f64 (*.f64 1/6 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 (*.f64 phi1 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2))) (pow.f64 (pow.f64 R 7) 1/9))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (pow.f64 R 1/3))))
(+.f64 (*.f64 1/6 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 (*.f64 phi1 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2))) (pow.f64 (pow.f64 R 7) 1/9))))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 R 2))) 1/3) (*.f64 (pow.f64 phi1 2) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (pow.f64 R 1/3)))))
(+.f64 (*.f64 1/6 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 (*.f64 phi1 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2))) (pow.f64 (pow.f64 R 7) 1/9))))) (+.f64 (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (-.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2))) (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))) (+.f64 (*.f64 1/216 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 3) (pow.f64 (pow.f64 R 7) 1/3))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/9) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9))))))))))) (pow.f64 phi1 3)) (pow.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 R 2))) 1/3))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 R 2))) 1/3) (*.f64 (pow.f64 phi1 2) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (pow.f64 R 1/3))))))
(*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6)))
(+.f64 (*.f64 1/6 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) phi2) (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/9) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6))))
(+.f64 (*.f64 1/6 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) phi2) (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/9) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 R 2))) 1/3) (*.f64 (pow.f64 phi2 2) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9))))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6)))))
(+.f64 (*.f64 1/6 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) phi2) (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/9) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (+.f64 (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 R (-.f64 (+.f64 (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))))) (+.f64 (*.f64 1/216 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 3) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 3))) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/3)))) (*.f64 1/3 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9) (*.f64 (pow.f64 1 1/3) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/6))))))) (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/3) (pow.f64 (/.f64 (*.f64 (pow.f64 1 4) (pow.f64 R 4)) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 4)) 1/9)))))) (pow.f64 phi2 3)) (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 R 2))) 1/3))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 R 2))) 1/3) (*.f64 (pow.f64 phi2 2) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9))))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6))))))
(*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 R 1/3)))
(+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 R 1/3))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (pow.f64 (pow.f64 R 7) 1/9))))))
(+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 R 1/3))) (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (pow.f64 (pow.f64 R 7) 1/9))))) (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 R 2))) 1/3)))))
(+.f64 (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 R 2))) 1/3) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))))) (+.f64 (*.f64 -1/27 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (*.f64 (pow.f64 lambda2 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 6)) (pow.f64 (pow.f64 R 7) 1/3))))) (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))))) (pow.f64 lambda1 3)))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 R 1/3))) (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (pow.f64 (pow.f64 R 7) 1/9))))) (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 R 2))) 1/3))))))
(*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))
(+.f64 (*.f64 -1/3 (*.f64 (sqrt.f64 1) (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (*.f64 (pow.f64 (pow.f64 R 7) 1/9) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6))))
(+.f64 (*.f64 -1/3 (*.f64 (sqrt.f64 1) (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (*.f64 (pow.f64 (pow.f64 R 7) 1/9) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))))) (+.f64 (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (pow.f64 lambda2 2)) (pow.f64 (/.f64 1 (*.f64 (pow.f64 R 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) 1/3))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))))
(+.f64 (*.f64 -1/3 (*.f64 (sqrt.f64 1) (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (*.f64 (pow.f64 (pow.f64 R 7) 1/9) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))))) (+.f64 (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (pow.f64 lambda2 2)) (pow.f64 (/.f64 1 (*.f64 (pow.f64 R 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) 1/3))) (+.f64 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (pow.f64 R 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) 1/3) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (+.f64 (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))) (*.f64 -1/27 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 7) 1/3) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 6) (pow.f64 lambda1 3)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6))))))) (pow.f64 lambda2 3)))))))
(*.f64 (pow.f64 1 1/6) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R))
(+.f64 (*.f64 phi1 (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (pow.f64 (pow.f64 R 13) 1/9))))) (*.f64 1/6 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (pow.f64 (pow.f64 R 13) 1/9))))))) (*.f64 (pow.f64 1 1/6) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R)))
(+.f64 (*.f64 phi1 (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (pow.f64 (pow.f64 R 13) 1/9))))) (*.f64 1/6 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (pow.f64 (pow.f64 R 13) 1/9))))))) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 1/36 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/9) (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2))) (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))))))) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (pow.f64 R 1/3)))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9)))))))) (*.f64 1/18 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9)))))))) (*.f64 (pow.f64 1 1/6) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R))))
(+.f64 (*.f64 phi1 (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (pow.f64 (pow.f64 R 13) 1/9))))) (*.f64 1/6 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (pow.f64 (pow.f64 R 13) 1/9))))))) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 1/36 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/9) (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2))) (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))))))) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (pow.f64 R 1/3)))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9)))))))) (*.f64 1/18 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9)))))))) (+.f64 (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 1/6 (*.f64 (pow.f64 1 1/6) (*.f64 (*.f64 (+.f64 (*.f64 1/36 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/9) (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2))) (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2))) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (pow.f64 (pow.f64 R 7) 1/9))))) (+.f64 (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/9) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9))))))))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (-.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2))) (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))) (+.f64 (*.f64 1/216 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 3) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/6) (pow.f64 (pow.f64 R 7) 1/3))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/9) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (*.f64 (+.f64 (*.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (-.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2))) (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))) (+.f64 (*.f64 1/216 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 3) (pow.f64 (pow.f64 R 7) 1/3))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/9) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9))))))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (pow.f64 (/.f64 1 R) 1/3))))) (*.f64 1/9 (*.f64 (sqrt.f64 1) (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 17)) 1/18) (pow.f64 R 1/9)))))) (pow.f64 R 1/3)))))))) (*.f64 (pow.f64 1 1/6) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R)))))
(*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 R (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/3))))
(+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 R (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/3)))) (*.f64 phi2 (+.f64 (*.f64 1/6 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (pow.f64 (*.f64 1 (*.f64 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 R 13))) 1/9)))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/18) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/3)))))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/18 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 11)) 1/18) (*.f64 (sqrt.f64 1) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 4)) 1/9))))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 1/36 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9))) (*.f64 2/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) R)) 1/3) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9))))))))))) (pow.f64 R 1/3)))) (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9) (*.f64 (pow.f64 1 1/3) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/6)))))))))) (pow.f64 phi2 2)) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 R (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/3)))) (*.f64 phi2 (+.f64 (*.f64 1/6 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (pow.f64 (*.f64 1 (*.f64 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 R 13))) 1/9)))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/18) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/3))))))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/18 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 11)) 1/18) (*.f64 (sqrt.f64 1) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 4)) 1/9))))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 1/36 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9))) (*.f64 2/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) R)) 1/3) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9))))))))))) (pow.f64 R 1/3)))) (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9) (*.f64 (pow.f64 1 1/3) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/6)))))))))) (pow.f64 phi2 2)) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 R (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/3)))) (+.f64 (*.f64 phi2 (+.f64 (*.f64 1/6 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (pow.f64 (*.f64 1 (*.f64 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 R 13))) 1/9)))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/18) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/3)))))))) (*.f64 (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (-.f64 (+.f64 (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))))) (+.f64 (*.f64 1/216 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 3) (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/3) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 3)))))) (*.f64 1/3 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9))))))) (*.f64 (pow.f64 (/.f64 (*.f64 (pow.f64 1 4) (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 4)) 1/9) (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/3)))))) (pow.f64 1 1/3))) (+.f64 (*.f64 1/9 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9) (*.f64 (pow.f64 1 1/3) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/6))))))) (*.f64 (pow.f64 (/.f64 (*.f64 (pow.f64 1 4) (pow.f64 R 4)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/9) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/3)))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (+.f64 (*.f64 1/9 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9))))))) (*.f64 (pow.f64 (/.f64 (*.f64 1 R) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 4)) 1/9) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (*.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 R (-.f64 (+.f64 (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))))) (+.f64 (*.f64 1/216 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 3) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 3))) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/3)))) (*.f64 1/3 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9) (*.f64 (pow.f64 1 1/3) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/6))))))) (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/3) (pow.f64 (/.f64 (*.f64 (pow.f64 1 4) (pow.f64 R 4)) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 4)) 1/9)))))) (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) R)) 1/3) (*.f64 (sqrt.f64 1) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6))))))))) (*.f64 1/6 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (+.f64 (*.f64 1/36 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9))) (*.f64 2/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) R)) 1/3) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9)))))))))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/9))))))) (pow.f64 phi2 3)))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (pow.f64 1 1/6) R))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (pow.f64 1 1/6) R)) (*.f64 (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 (pow.f64 1 1/6) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (pow.f64 R 13) 1/9))))) (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (pow.f64 R 13) 1/9)))))) lambda1))
(+.f64 (*.f64 (+.f64 (*.f64 2/9 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (pow.f64 1 1/3))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (+.f64 (*.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 (/.f64 1 R) 1/3))))) (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/9) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)))))))))) (pow.f64 lambda1 2)) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (pow.f64 1 1/6) R)) (*.f64 (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 (pow.f64 1 1/6) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (pow.f64 R 13) 1/9))))) (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (pow.f64 R 13) 1/9)))))) lambda1)))
(+.f64 (*.f64 (+.f64 (*.f64 2/9 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (pow.f64 1 1/3))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (+.f64 (*.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 (/.f64 1 R) 1/3))))) (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/9) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)))))))))) (pow.f64 lambda1 2)) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (pow.f64 1 1/6) R)) (+.f64 (*.f64 (+.f64 (*.f64 -2/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))) (+.f64 (*.f64 (+.f64 (*.f64 -2/9 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 17)) 1/18) (*.f64 (sqrt.f64 1) (pow.f64 R 1/9))))) (*.f64 2/3 (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))))) (+.f64 (*.f64 -1/27 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (*.f64 (pow.f64 lambda2 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 6)) (pow.f64 (pow.f64 R 7) 1/3))))) (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))))))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 R 1/3)))) (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (*.f64 (+.f64 (*.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 (/.f64 1 R) 1/3))))) (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/9) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4))))) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (pow.f64 (pow.f64 R 7) 1/9))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))))) (+.f64 (*.f64 -1/27 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (*.f64 (pow.f64 lambda2 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 6)) (pow.f64 (pow.f64 R 7) 1/3))))) (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))))))) (pow.f64 lambda1 3)) (*.f64 (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 (pow.f64 1 1/6) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (pow.f64 R 13) 1/9))))) (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (pow.f64 R 13) 1/9)))))) lambda1))))
(*.f64 (pow.f64 1 1/6) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 (*.f64 (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18))))) (*.f64 -2/3 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18)))))) lambda2) (*.f64 (pow.f64 1 1/6) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))
(+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 2/9 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18))))) (+.f64 (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))))) (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/9) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (pow.f64 1 1/3)))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18))))) (*.f64 -2/3 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18)))))) lambda2) (*.f64 (pow.f64 1 1/6) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 2/9 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18))))) (+.f64 (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))))) (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/9) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (pow.f64 1 1/3)))))) (+.f64 (*.f64 (+.f64 (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (+.f64 (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))) (*.f64 -1/27 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 7) 1/3) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 6) (pow.f64 lambda1 3)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6))))))) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))))) (*.f64 -2/9 (*.f64 (pow.f64 1 1/6) (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (*.f64 (pow.f64 R 1/9) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 17)) 1/18)))))) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (+.f64 (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))) (*.f64 -1/27 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 7) 1/3) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 6) (pow.f64 lambda1 3)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6))))))))) (+.f64 (*.f64 -2/9 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9))) (*.f64 -1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (*.f64 (+.f64 (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))))) (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/9) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (*.f64 (pow.f64 (pow.f64 R 7) 1/9) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)))))))) (pow.f64 lambda2 3)) (+.f64 (*.f64 (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18))))) (*.f64 -2/3 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18)))))) lambda2) (*.f64 (pow.f64 1 1/6) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (exp.f64 (log1p.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) 1)
(*.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1)
(*.f64 1 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6))
(*.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2))
(*.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) (pow.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) 1/3))
(*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2) (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(*.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (cbrt.f64 R))
(*.f64 (cbrt.f64 R) (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) 1/3) (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(*.f64 (pow.f64 1 1/3) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1/3) (pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1/3))
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1)
(pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/3)
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) 2)
(pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 3)
(sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2))
(log.f64 (exp.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(log.f64 (+.f64 1 (expm1.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))))
(expm1.f64 (log1p.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(exp.f64 (log.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(exp.f64 (*.f64 (log.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 1))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1/3))
(log1p.f64 (expm1.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 1)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) R)
(*.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2))
(*.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1)
(*.f64 1 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) (*.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)))
(*.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (*.f64 (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) R))
(*.f64 (sqrt.f64 R) (*.f64 (sqrt.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2) (*.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2) (*.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) R))
(*.f64 (cbrt.f64 R) (*.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)))
(*.f64 (pow.f64 (cbrt.f64 R) 2) (*.f64 (cbrt.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 (*.f64 R (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 (*.f64 R (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2)) (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 (*.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) (sqrt.f64 R)) (sqrt.f64 R))
(*.f64 (*.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) (pow.f64 (cbrt.f64 R) 2)) (cbrt.f64 R))
(*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) 1) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6)) (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6))
(*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2)) (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (cbrt.f64 R)) (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 (pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) 3) (pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) 3))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2) 3) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2))
(log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3)))
(cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3) (pow.f64 R 3)))
(expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1))
(log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1)
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1)
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2)
(pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3)
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2))
(log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))))
(cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3)))
(cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)))
(expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1))
(log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
Outputs
(*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (pow.f64 R 1/3)))
(*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (cbrt.f64 R))
(+.f64 (*.f64 1/6 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 (*.f64 phi1 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2))) (pow.f64 (pow.f64 R 7) 1/9))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (pow.f64 R 1/3))))
(fma.f64 1/6 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 phi1 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18))))) (*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (cbrt.f64 R)))
(fma.f64 1/6 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 phi1 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18))))) (*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (cbrt.f64 R)))
(+.f64 (*.f64 1/6 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 (*.f64 phi1 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2))) (pow.f64 (pow.f64 R 7) 1/9))))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 R 2))) 1/3) (*.f64 (pow.f64 phi1 2) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (pow.f64 R 1/3)))))
(fma.f64 1/6 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 phi1 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18))))) (fma.f64 1/3 (*.f64 (cbrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 R R)))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 -1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)))))))) (*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (cbrt.f64 R))))
(fma.f64 1/6 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 phi1 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18))))) (fma.f64 1/3 (*.f64 (cbrt.f64 (/.f64 (/.f64 1 (*.f64 R R)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (*.f64 phi1 phi1) (fma.f64 1/2 (*.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (*.f64 R (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18)) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))) -1/12)))) (*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (cbrt.f64 R))))
(+.f64 (*.f64 1/6 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 (*.f64 phi1 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2))) (pow.f64 (pow.f64 R 7) 1/9))))) (+.f64 (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (-.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2))) (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))) (+.f64 (*.f64 1/216 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 3) (pow.f64 (pow.f64 R 7) 1/3))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/9) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9))))))))))) (pow.f64 phi1 3)) (pow.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 R 2))) 1/3))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 R 2))) 1/3) (*.f64 (pow.f64 phi1 2) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (pow.f64 R 1/3))))))
(fma.f64 1/6 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 phi1 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18))))) (fma.f64 1/3 (*.f64 (cbrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 R R)))) (*.f64 (pow.f64 phi1 3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) R) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (*.f64 -1/2 (/.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))))))))) (fma.f64 1/216 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/6) (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 3) (cbrt.f64 (pow.f64 R 7)))) (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18)) (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 -1/12 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))))))))))))) (fma.f64 1/3 (*.f64 (cbrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 R R)))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 -1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)))))))) (*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (cbrt.f64 R)))))
(fma.f64 1/6 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 phi1 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18))))) (fma.f64 1/3 (*.f64 (cbrt.f64 (/.f64 (/.f64 1 (*.f64 R R)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (pow.f64 phi1 3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) R) (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) 1/6) (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))) -1/2)))) (fma.f64 1/216 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/6) (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 3) (cbrt.f64 (pow.f64 R 7)))) (*.f64 1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18)) (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (fma.f64 1/2 (*.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (*.f64 R (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)))) -1/12)))))))) (fma.f64 1/3 (*.f64 (cbrt.f64 (/.f64 (/.f64 1 (*.f64 R R)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (*.f64 phi1 phi1) (fma.f64 1/2 (*.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (*.f64 R (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18)) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))) -1/12)))) (*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (cbrt.f64 R)))))
(*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6)))
(*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6))
(+.f64 (*.f64 1/6 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) phi2) (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/9) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6))))
(fma.f64 1/6 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18) (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18))))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6)))
(fma.f64 1/6 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18) (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18))))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6)))
(+.f64 (*.f64 1/6 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) phi2) (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/9) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 R 2))) 1/3) (*.f64 (pow.f64 phi2 2) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9))))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6)))))
(fma.f64 1/6 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18) (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18))))) (fma.f64 1/3 (*.f64 (cbrt.f64 (/.f64 1 (*.f64 (*.f64 R R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (*.f64 (*.f64 phi2 phi2) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (neg.f64 (*.f64 1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6) (*.f64 1 (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18)))))))))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6))))
(fma.f64 1/6 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18) (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18))))) (fma.f64 1/3 (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (/.f64 1 R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R)) (*.f64 phi2 phi2)) (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6)) -1/12))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6))))
(+.f64 (*.f64 1/6 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) phi2) (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/9) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (+.f64 (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 R (-.f64 (+.f64 (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))))) (+.f64 (*.f64 1/216 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 3) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 3))) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/3)))) (*.f64 1/3 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9) (*.f64 (pow.f64 1 1/3) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/6))))))) (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/3) (pow.f64 (/.f64 (*.f64 (pow.f64 1 4) (pow.f64 R 4)) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 4)) 1/9)))))) (pow.f64 phi2 3)) (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 R 2))) 1/3))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 R 2))) 1/3) (*.f64 (pow.f64 phi2 2) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9))))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6))))))
(fma.f64 1/6 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18) (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18))))) (fma.f64 1/3 (*.f64 (cbrt.f64 (/.f64 1 (*.f64 (*.f64 R R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) 1/6) (*.f64 -1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)) (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)))))))))) (fma.f64 1/216 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 3) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 3))) (cbrt.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 1/3 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (neg.f64 (*.f64 1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6) (*.f64 1 (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18)))))))) (*.f64 (cbrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18)))))))) (pow.f64 phi2 3))) (fma.f64 1/3 (*.f64 (cbrt.f64 (/.f64 1 (*.f64 (*.f64 R R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (*.f64 (*.f64 phi2 phi2) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (neg.f64 (*.f64 1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6) (*.f64 1 (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18)))))))))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6)))))
(fma.f64 1/6 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18) (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18))))) (fma.f64 1/3 (*.f64 (cbrt.f64 (/.f64 (/.f64 (/.f64 1 R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R)) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) R) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) 1/6) (*.f64 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2))))) -1/2)))) (fma.f64 1/216 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 3) (cbrt.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 3)))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6)) -1/12)) (*.f64 (cbrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18)))))))) (pow.f64 phi2 3))) (fma.f64 1/3 (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (/.f64 1 R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R)) (*.f64 phi2 phi2)) (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6)) -1/12))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6)))))
(*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 R 1/3)))
(*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6))
(+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 R 1/3))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (pow.f64 (pow.f64 R 7) 1/9))))))
(fma.f64 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (cbrt.f64 R) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 1 (*.f64 lambda2 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18))))))))
(fma.f64 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (cbrt.f64 R) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)))))))
(+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 R 1/3))) (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (pow.f64 (pow.f64 R 7) 1/9))))) (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 R 2))) 1/3)))))
(fma.f64 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (cbrt.f64 R) (fma.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 1 (*.f64 lambda2 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)))))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))))))) (*.f64 (*.f64 lambda1 lambda1) (cbrt.f64 (/.f64 1 (*.f64 (*.f64 R R) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))))
(fma.f64 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (cbrt.f64 R) (fma.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18))))) (*.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) R) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))) (*.f64 (*.f64 lambda1 lambda1) (cbrt.f64 (/.f64 (/.f64 1 (*.f64 R R)) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(+.f64 (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 R 2))) 1/3) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))))) (+.f64 (*.f64 -1/27 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (*.f64 (pow.f64 lambda2 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 6)) (pow.f64 (pow.f64 R 7) 1/3))))) (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))))) (pow.f64 lambda1 3)))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 R 1/3))) (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (pow.f64 (pow.f64 R 7) 1/9))))) (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 R 2))) 1/3))))))
(fma.f64 1/3 (*.f64 (cbrt.f64 (/.f64 1 (*.f64 (*.f64 R R) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))))) (fma.f64 -1/27 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6) (*.f64 (cbrt.f64 (pow.f64 R 7)) (*.f64 (pow.f64 lambda2 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 6)))) (*.f64 -2/3 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))))))))) (pow.f64 lambda1 3))) (fma.f64 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (cbrt.f64 R) (fma.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 1 (*.f64 lambda2 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)))))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))))))) (*.f64 (*.f64 lambda1 lambda1) (cbrt.f64 (/.f64 1 (*.f64 (*.f64 R R) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))))))))
(fma.f64 1/3 (*.f64 (cbrt.f64 (/.f64 (/.f64 1 (*.f64 R R)) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 (*.f64 lambda2 R) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (fma.f64 -1/27 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6) (*.f64 (cbrt.f64 (pow.f64 R 7)) (*.f64 (pow.f64 lambda2 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 6)))) (*.f64 (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18))) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) R) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))))))) (pow.f64 lambda1 3))) (fma.f64 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (cbrt.f64 R) (fma.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 lambda2 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18))))) (*.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) R) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))) (*.f64 (*.f64 lambda1 lambda1) (cbrt.f64 (/.f64 (/.f64 1 (*.f64 R R)) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))))
(*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))
(*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6))
(+.f64 (*.f64 -1/3 (*.f64 (sqrt.f64 1) (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (*.f64 (pow.f64 (pow.f64 R 7) 1/9) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6))))
(fma.f64 -1/3 (*.f64 lambda2 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))
(fma.f64 -1/3 (*.f64 (*.f64 lambda2 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))
(+.f64 (*.f64 -1/3 (*.f64 (sqrt.f64 1) (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (*.f64 (pow.f64 (pow.f64 R 7) 1/9) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))))) (+.f64 (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (pow.f64 lambda2 2)) (pow.f64 (/.f64 1 (*.f64 (pow.f64 R 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) 1/3))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))))
(fma.f64 -1/3 (*.f64 lambda2 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)))) (fma.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (neg.f64 (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (*.f64 lambda2 lambda2) (cbrt.f64 (/.f64 1 (*.f64 (*.f64 R R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6))))
(fma.f64 -1/3 (*.f64 (*.f64 lambda2 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)) (fma.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))) (*.f64 (*.f64 lambda2 lambda2) (cbrt.f64 (/.f64 (/.f64 1 (*.f64 R R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6))))
(+.f64 (*.f64 -1/3 (*.f64 (sqrt.f64 1) (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (*.f64 (pow.f64 (pow.f64 R 7) 1/9) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))))) (+.f64 (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (pow.f64 lambda2 2)) (pow.f64 (/.f64 1 (*.f64 (pow.f64 R 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) 1/3))) (+.f64 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (pow.f64 R 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) 1/3) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (+.f64 (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))) (*.f64 -1/27 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 7) 1/3) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 6) (pow.f64 lambda1 3)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6))))))) (pow.f64 lambda2 3)))))))
(fma.f64 -1/3 (*.f64 lambda2 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)))) (+.f64 (fma.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (neg.f64 (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (*.f64 lambda2 lambda2) (cbrt.f64 (/.f64 1 (*.f64 (*.f64 R R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6))) (*.f64 1/3 (*.f64 (cbrt.f64 (/.f64 1 (*.f64 (*.f64 R R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 (pow.f64 lambda2 3) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (fma.f64 -2/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (neg.f64 (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)))) (*.f64 -1/27 (*.f64 (cbrt.f64 (pow.f64 R 7)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 6) (pow.f64 lambda1 3)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6)))))))))))
(+.f64 (fma.f64 -1/3 (*.f64 (*.f64 lambda2 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)) (fma.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))) (*.f64 (*.f64 lambda2 lambda2) (cbrt.f64 (/.f64 (/.f64 1 (*.f64 R R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))) (*.f64 1/3 (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 1 (*.f64 R R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (fma.f64 -2/3 (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)))) (*.f64 -1/27 (*.f64 (*.f64 (cbrt.f64 (pow.f64 R 7)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 6) (pow.f64 lambda1 3))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6)))))) (pow.f64 lambda2 3))))
(*.f64 (pow.f64 1 1/6) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R))
(*.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))
(+.f64 (*.f64 phi1 (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (pow.f64 (pow.f64 R 13) 1/9))))) (*.f64 1/6 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (pow.f64 (pow.f64 R 13) 1/9))))))) (*.f64 (pow.f64 1 1/6) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R)))
(fma.f64 phi1 (*.f64 (*.f64 1 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18))))) 1/2) (*.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(fma.f64 phi1 (*.f64 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)))) 1/2) (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))
(+.f64 (*.f64 phi1 (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (pow.f64 (pow.f64 R 13) 1/9))))) (*.f64 1/6 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (pow.f64 (pow.f64 R 13) 1/9))))))) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 1/36 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/9) (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2))) (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))))))) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (pow.f64 R 1/3)))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9)))))))) (*.f64 1/18 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9)))))))) (*.f64 (pow.f64 1 1/6) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R))))
(fma.f64 phi1 (*.f64 (*.f64 1 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18))))) 1/2) (fma.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (cbrt.f64 R)) (fma.f64 1/36 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18))) (*.f64 2/3 (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (*.f64 (cbrt.f64 (/.f64 1 R)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 -1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))))))))))) (+.f64 (*.f64 1/3 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 -1/12 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))))))) (*.f64 1/18 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))))))) (*.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 phi1 (*.f64 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)))) 1/2) (fma.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (cbrt.f64 R)) (fma.f64 1/36 (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18))) (*.f64 2/3 (*.f64 (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (cbrt.f64 (/.f64 1 R))) (fma.f64 1/2 (*.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (*.f64 R (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18)) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))) -1/12)))))) (fma.f64 1/3 (fma.f64 1/2 (*.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (*.f64 R (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)))) -1/12)) (*.f64 1/18 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))))))) (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(+.f64 (*.f64 phi1 (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (pow.f64 (pow.f64 R 13) 1/9))))) (*.f64 1/6 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (pow.f64 (pow.f64 R 13) 1/9))))))) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 1/36 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/9) (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2))) (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))))))) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (pow.f64 R 1/3)))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9)))))))) (*.f64 1/18 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9)))))))) (+.f64 (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 1/6 (*.f64 (pow.f64 1 1/6) (*.f64 (*.f64 (+.f64 (*.f64 1/36 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/9) (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2))) (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2))) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (pow.f64 (pow.f64 R 7) 1/9))))) (+.f64 (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/9) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9))))))))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (-.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2))) (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))) (+.f64 (*.f64 1/216 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 3) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/6) (pow.f64 (pow.f64 R 7) 1/3))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/9) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (*.f64 (+.f64 (*.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (-.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2))) (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))) (+.f64 (*.f64 1/216 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 3) (pow.f64 (pow.f64 R 7) 1/3))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/9) (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (pow.f64 (pow.f64 R 17) 1/9))))))))))) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (pow.f64 (/.f64 1 R) 1/3))))) (*.f64 1/9 (*.f64 (sqrt.f64 1) (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (pow.f64 (pow.f64 R 17) 1/9))))))) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 17)) 1/18) (pow.f64 R 1/9)))))) (pow.f64 R 1/3)))))))) (*.f64 (pow.f64 1 1/6) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R)))))
(fma.f64 phi1 (*.f64 (*.f64 1 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18))))) 1/2) (fma.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (cbrt.f64 R)) (fma.f64 1/36 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18))) (*.f64 2/3 (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (*.f64 (cbrt.f64 (/.f64 1 R)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 -1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))))))))))) (+.f64 (*.f64 1/3 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 -1/12 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))))))) (*.f64 1/18 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))))))) (fma.f64 (pow.f64 phi1 3) (+.f64 (*.f64 1/6 (*.f64 (fma.f64 1/36 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18))) (*.f64 2/3 (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (*.f64 (cbrt.f64 (/.f64 1 R)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 -1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)))))))))) (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)))))) (fma.f64 1/9 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18)) (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 -1/12 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)))))))) (+.f64 (*.f64 1/3 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) R) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (*.f64 -1/2 (/.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))))))))) (fma.f64 1/216 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 3) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/6) (cbrt.f64 (pow.f64 R 7)))) (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18)) (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 -1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)))))))))))) (*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (*.f64 (cbrt.f64 R) (fma.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) R) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (*.f64 -1/2 (/.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))))))))) (fma.f64 1/216 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/6) (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 3) (cbrt.f64 (pow.f64 R 7)))) (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18)) (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 -1/12 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))))))))))) (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (cbrt.f64 (/.f64 1 R)))) (*.f64 1/9 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (+.f64 1 (-.f64 (fma.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 -1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi2 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)))))) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 17)) 1/18) (*.f64 (pow.f64 R 1/18) (pow.f64 R 1/18)))))))))))) (*.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(fma.f64 phi1 (*.f64 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/18) (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)))) 1/2) (fma.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (cbrt.f64 R)) (fma.f64 1/36 (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18))) (*.f64 2/3 (*.f64 (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (cbrt.f64 (/.f64 1 R))) (fma.f64 1/2 (*.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (*.f64 R (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18)) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))) -1/12)))))) (fma.f64 1/3 (fma.f64 1/2 (*.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (*.f64 R (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)))) -1/12)) (*.f64 1/18 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))))))) (fma.f64 (pow.f64 phi1 3) (fma.f64 1/6 (*.f64 (fma.f64 1/36 (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18))) (*.f64 2/3 (*.f64 (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (cbrt.f64 (/.f64 1 R))) (fma.f64 1/2 (*.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (*.f64 R (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18)) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))) -1/12))))) (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/18) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18))))) (fma.f64 1/9 (*.f64 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18)) (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (fma.f64 1/2 (*.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (*.f64 R (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)))) -1/12))) (fma.f64 1/3 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) R) (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) 1/6) (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))) -1/2)))) (fma.f64 1/216 (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 3) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/6) (cbrt.f64 (pow.f64 R 7)))) (*.f64 1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18)) (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (fma.f64 1/2 (*.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (*.f64 R (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18)) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))) -1/12)))))) (*.f64 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (*.f64 (cbrt.f64 R) (fma.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) R) (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) 1/6) (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))) -1/2)))) (fma.f64 1/216 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 11)) 1/6) (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 3) (cbrt.f64 (pow.f64 R 7)))) (*.f64 1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 7)) 1/18)) (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (fma.f64 1/2 (*.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (*.f64 R (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18) (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)))) -1/12)))))) (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/6) (cbrt.f64 (/.f64 1 R)))) (*.f64 1/9 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 (fma.f64 1/2 (*.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (+.f64 (*.f64 -1/4 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2)) (*.f64 1/4 (pow.f64 (sin.f64 (*.f64 phi2 1/2)) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (*.f64 R (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi2 -2) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 19)) 1/18)) (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18))) -1/12)) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 17)) 1/18) (*.f64 (pow.f64 R 1/18) (pow.f64 R 1/18)))))))))))) (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 phi2 1/2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 R (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/3))))
(*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 R (cbrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))
(+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 R (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/3)))) (*.f64 phi2 (+.f64 (*.f64 1/6 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (pow.f64 (*.f64 1 (*.f64 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 R 13))) 1/9)))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/18) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/3)))))))))
(fma.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 R (cbrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 phi2 (fma.f64 1/6 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2) (pow.f64 R 13)) 1/18) (pow.f64 (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2) (pow.f64 R 13)) 1/18)))) (*.f64 1/3 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (cbrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))))))))
(fma.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 R (cbrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 phi2 (fma.f64 1/6 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2) (pow.f64 R 13)) 1/18) (pow.f64 (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2) (pow.f64 R 13)) 1/18)))) (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/18)) (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (cbrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/18 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 11)) 1/18) (*.f64 (sqrt.f64 1) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 4)) 1/9))))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 1/36 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9))) (*.f64 2/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) R)) 1/3) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9))))))))))) (pow.f64 R 1/3)))) (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9) (*.f64 (pow.f64 1 1/3) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/6)))))))))) (pow.f64 phi2 2)) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 R (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/3)))) (*.f64 phi2 (+.f64 (*.f64 1/6 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (pow.f64 (*.f64 1 (*.f64 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 R 13))) 1/9)))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/18) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/3))))))))))
(fma.f64 (fma.f64 1/18 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 11)) 1/18) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18)))) (fma.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 (cbrt.f64 R) (fma.f64 1/36 (/.f64 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (*.f64 2/3 (*.f64 (cbrt.f64 (/.f64 1 (*.f64 R (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (neg.f64 (*.f64 1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6) (*.f64 1 (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18)))))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6)))))) (*.f64 1/3 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (neg.f64 (*.f64 1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6) (*.f64 1 (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))))))))))) (*.f64 phi2 phi2) (fma.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 R (cbrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 phi2 (fma.f64 1/6 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2) (pow.f64 R 13)) 1/18) (pow.f64 (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2) (pow.f64 R 13)) 1/18)))) (*.f64 1/3 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (cbrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))))))
(fma.f64 (fma.f64 1/18 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 11)) 1/18)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18))) (fma.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 (cbrt.f64 R) (fma.f64 1/36 (/.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18)))) (*.f64 (*.f64 2/3 (cbrt.f64 (/.f64 (/.f64 1 R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6)) -1/12)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6))))) (*.f64 1/3 (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6)) -1/12))))) (*.f64 phi2 phi2) (fma.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 R (cbrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 phi2 (fma.f64 1/6 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2) (pow.f64 R 13)) 1/18) (pow.f64 (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2) (pow.f64 R 13)) 1/18)))) (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/18)) (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (cbrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/18 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 11)) 1/18) (*.f64 (sqrt.f64 1) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 4)) 1/9))))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 1/36 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9))) (*.f64 2/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) R)) 1/3) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9))))))))))) (pow.f64 R 1/3)))) (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9) (*.f64 (pow.f64 1 1/3) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/6)))))))))) (pow.f64 phi2 2)) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 R (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/3)))) (+.f64 (*.f64 phi2 (+.f64 (*.f64 1/6 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (pow.f64 (*.f64 1 (*.f64 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2) (pow.f64 R 13))) 1/9)))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/18) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/3)))))))) (*.f64 (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (-.f64 (+.f64 (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))))) (+.f64 (*.f64 1/216 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 3) (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/3) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 3)))))) (*.f64 1/3 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9))))))) (*.f64 (pow.f64 (/.f64 (*.f64 (pow.f64 1 4) (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 4)) 1/9) (pow.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/3)))))) (pow.f64 1 1/3))) (+.f64 (*.f64 1/9 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9) (*.f64 (pow.f64 1 1/3) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/6))))))) (*.f64 (pow.f64 (/.f64 (*.f64 (pow.f64 1 4) (pow.f64 R 4)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/9) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/3)))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (+.f64 (*.f64 1/9 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9))))))) (*.f64 (pow.f64 (/.f64 (*.f64 1 R) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 4)) 1/9) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (*.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 R (-.f64 (+.f64 (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))))) (+.f64 (*.f64 1/216 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 3) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 3))) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/3)))) (*.f64 1/3 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9) (*.f64 (pow.f64 1 1/3) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 5)) 1/6))))))) (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) 1/3) (pow.f64 (/.f64 (*.f64 (pow.f64 1 4) (pow.f64 R 4)) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 4)) 1/9)))))) (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) R)) 1/3) (*.f64 (sqrt.f64 1) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6))))))))) (*.f64 1/6 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (+.f64 (*.f64 1/36 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 2)) 1/9))) (*.f64 2/3 (*.f64 (pow.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) R)) 1/3) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 1/6) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 1/12 (*.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 5)) 1/6) (*.f64 (pow.f64 (pow.f64 1 11) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 2)) 1/9)))))))))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 7)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) 1/9))))))) (pow.f64 phi2 3)))))
(fma.f64 (fma.f64 1/18 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 11)) 1/18) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18)))) (fma.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 (cbrt.f64 R) (fma.f64 1/36 (/.f64 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (*.f64 2/3 (*.f64 (cbrt.f64 (/.f64 1 (*.f64 R (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (neg.f64 (*.f64 1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6) (*.f64 1 (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18)))))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6)))))) (*.f64 1/3 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (neg.f64 (*.f64 1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6) (*.f64 1 (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))))))))))) (*.f64 phi2 phi2) (fma.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 R (cbrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (fma.f64 phi2 (fma.f64 1/6 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2) (pow.f64 R 13)) 1/18) (pow.f64 (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2) (pow.f64 R 13)) 1/18)))) (*.f64 1/3 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (cbrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))) (*.f64 (pow.f64 phi2 3) (fma.f64 1/3 (*.f64 1 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) 1/6) (*.f64 -1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)) (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)))))))))) (fma.f64 1/216 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 3) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 3))) (cbrt.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 1/3 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (neg.f64 (*.f64 1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6) (*.f64 1 (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18)))))))) (*.f64 (cbrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18))))))))) (fma.f64 1/9 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (neg.f64 (*.f64 1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6) (*.f64 1 (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18)))))))) (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18)) (cbrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)))))) (fma.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 (cbrt.f64 R) (fma.f64 1/9 (*.f64 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (neg.f64 (*.f64 1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6) (*.f64 1 (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))))))))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 R (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18) (pow.f64 (/.f64 R (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18)))) (*.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) 1/6) (*.f64 -1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)) (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)))))))))) (fma.f64 1/216 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 3) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 3))) (cbrt.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 1/3 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (neg.f64 (*.f64 1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6) (*.f64 1 (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18)))))))) (*.f64 (cbrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18)))))))) (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (cbrt.f64 (/.f64 1 (*.f64 R (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))))))) (*.f64 1/6 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (*.f64 (fma.f64 1/36 (/.f64 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (*.f64 2/3 (*.f64 (cbrt.f64 (/.f64 1 (*.f64 R (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (neg.f64 (*.f64 1/12 (*.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 phi1 -2)) 2) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6) (*.f64 1 (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18)))))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6))))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18) (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18)))))))))))))
(fma.f64 (fma.f64 1/18 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 11)) 1/18)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18))) (fma.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 (cbrt.f64 R) (fma.f64 1/36 (/.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18)))) (*.f64 (*.f64 2/3 (cbrt.f64 (/.f64 (/.f64 1 R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6)) -1/12)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6))))) (*.f64 1/3 (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6)) -1/12))))) (*.f64 phi2 phi2) (fma.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 R (cbrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (fma.f64 phi2 (fma.f64 1/6 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2) (pow.f64 R 13)) 1/18) (pow.f64 (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2) (pow.f64 R 13)) 1/18)))) (*.f64 1/3 (*.f64 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/18)) (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (cbrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))))) (*.f64 (pow.f64 phi2 3) (fma.f64 1/3 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) R) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) 1/6) (*.f64 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2))))) -1/2)))) (fma.f64 1/216 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 3) (cbrt.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 3)))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6)) -1/12)) (*.f64 (cbrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18)))))))) (fma.f64 1/9 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6)) -1/12)) (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18)) (cbrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)))))) (fma.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (*.f64 (cbrt.f64 R) (fma.f64 1/9 (*.f64 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6)) -1/12))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 R (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18) (pow.f64 (/.f64 R (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18)))) (*.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) R) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))) 1/6) (*.f64 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2))))) -1/2)))) (fma.f64 1/216 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 3) (cbrt.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 3)))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6)) -1/12)) (*.f64 (cbrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 4)) 1/18)))))))) (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6) (cbrt.f64 (/.f64 (/.f64 1 R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))) (*.f64 1/6 (*.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (fma.f64 1/36 (/.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18)))) (*.f64 (*.f64 2/3 (cbrt.f64 (/.f64 (/.f64 1 R) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 1 (*.f64 -1/4 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1)))))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 phi1 -2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (sin.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18) (pow.f64 (/.f64 (pow.f64 R 17) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 2)) 1/18))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 5)) 1/6)) -1/12)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 1/6)))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18) (pow.f64 (/.f64 (pow.f64 R 7) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) 1/18)))))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (pow.f64 1 1/6) R))
(*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (pow.f64 1 1/6) R)) (*.f64 (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 (pow.f64 1 1/6) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (pow.f64 R 13) 1/9))))) (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (pow.f64 R 13) 1/9)))))) lambda1))
(fma.f64 (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R (*.f64 lambda1 (fma.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 1 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)))))) (*.f64 (*.f64 -2/3 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18)) (*.f64 1 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)))))))))
(fma.f64 (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18))))) -1)))
(+.f64 (*.f64 (+.f64 (*.f64 2/9 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (pow.f64 1 1/3))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (+.f64 (*.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 (/.f64 1 R) 1/3))))) (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/9) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)))))))))) (pow.f64 lambda1 2)) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (pow.f64 1 1/6) R)) (*.f64 (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 (pow.f64 1 1/6) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (pow.f64 R 13) 1/9))))) (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (pow.f64 R 13) 1/9)))))) lambda1)))
(fma.f64 (fma.f64 2/9 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))))) (fma.f64 1/3 (*.f64 1 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))))) (*.f64 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (cbrt.f64 R) (fma.f64 2/3 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))))))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 1/9 (*.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))))))))) (*.f64 lambda1 lambda1) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R (*.f64 lambda1 (fma.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 1 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)))))) (*.f64 (*.f64 -2/3 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18)) (*.f64 1 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18))))))))))
(fma.f64 (fma.f64 2/9 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))) (fma.f64 1/3 (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) R) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))) (*.f64 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (cbrt.f64 R) (fma.f64 2/3 (*.f64 (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) R) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))))) (*.f64 lambda1 lambda1) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18))))) -1))))
(+.f64 (*.f64 (+.f64 (*.f64 2/9 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (pow.f64 1 1/3))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 R 1/3) (+.f64 (*.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 (/.f64 1 R) 1/3))))) (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/9) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)))))))))) (pow.f64 lambda1 2)) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (pow.f64 1 1/6) R)) (+.f64 (*.f64 (+.f64 (*.f64 -2/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))))) (+.f64 (*.f64 (+.f64 (*.f64 -2/9 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 17)) 1/18) (*.f64 (sqrt.f64 1) (pow.f64 R 1/9))))) (*.f64 2/3 (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))))) (+.f64 (*.f64 -1/27 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (*.f64 (pow.f64 lambda2 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 6)) (pow.f64 (pow.f64 R 7) 1/3))))) (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))))))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 R 1/3)))) (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (*.f64 (+.f64 (*.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6) (*.f64 (sqrt.f64 1) (pow.f64 (/.f64 1 R) 1/3))))) (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/9) (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4))))) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (pow.f64 (pow.f64 R 7) 1/9))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))))) (+.f64 (*.f64 -1/27 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6) (*.f64 (sqrt.f64 1) (*.f64 (*.f64 (pow.f64 lambda2 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 6)) (pow.f64 (pow.f64 R 7) 1/3))))) (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4)) (pow.f64 (pow.f64 R 17) 1/9)))))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))))))) (pow.f64 lambda1 3)) (*.f64 (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 (pow.f64 1 1/6) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (pow.f64 R 13) 1/9))))) (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 (pow.f64 1 1/3) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (pow.f64 R 13) 1/9)))))) lambda1))))
(fma.f64 (fma.f64 2/9 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))))) (fma.f64 1/3 (*.f64 1 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))))) (*.f64 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (cbrt.f64 R) (fma.f64 2/3 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))))))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 1/9 (*.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))))))))) (*.f64 lambda1 lambda1) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R (fma.f64 (fma.f64 -2/9 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))))))))) (fma.f64 (fma.f64 -2/9 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))))))) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (*.f64 (pow.f64 R 1/18) (pow.f64 R 1/18)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 17)) 1/18)))) (*.f64 2/3 (*.f64 (pow.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))))) (fma.f64 -1/27 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6) (*.f64 (cbrt.f64 (pow.f64 R 7)) (*.f64 (pow.f64 lambda2 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 6)))) (*.f64 -2/3 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))))))))) (cbrt.f64 (/.f64 1 R)))))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)) (fma.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 1 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (fma.f64 2/3 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))))))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 1/9 (*.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)))))) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)))))) (*.f64 1/3 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))))) (fma.f64 -1/27 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6) (*.f64 (cbrt.f64 (pow.f64 R 7)) (*.f64 (pow.f64 lambda2 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 6)))) (*.f64 -2/3 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 1 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))))))))))))) (pow.f64 lambda1 3) (*.f64 lambda1 (fma.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 1 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)))))) (*.f64 (*.f64 -2/3 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18)) (*.f64 1 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)))))))))))
(fma.f64 (fma.f64 2/9 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))) (fma.f64 1/3 (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) R) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))) (*.f64 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6) (*.f64 (cbrt.f64 R) (fma.f64 2/3 (*.f64 (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) R) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))))) (*.f64 lambda1 lambda1) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R (fma.f64 (fma.f64 -2/9 (*.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) R) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))))) (fma.f64 (fma.f64 -2/9 (*.f64 (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) R) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (*.f64 (pow.f64 R 1/18) (pow.f64 R 1/18)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 17)) 1/18)))) (*.f64 (*.f64 2/3 (pow.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6)) (*.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 (*.f64 lambda2 R) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (fma.f64 -1/27 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6) (*.f64 (cbrt.f64 (pow.f64 R 7)) (*.f64 (pow.f64 lambda2 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 6)))) (*.f64 (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18))) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) R) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))))))) (cbrt.f64 (/.f64 1 R))))) (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)) (fma.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (fma.f64 2/3 (*.f64 (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) R) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))))) (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18))))) (*.f64 1/3 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 (*.f64 lambda2 R) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))))) (fma.f64 -1/27 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6) (*.f64 (cbrt.f64 (pow.f64 R 7)) (*.f64 (pow.f64 lambda2 3) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 6)))) (*.f64 (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18))) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (fma.f64 1/2 (*.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) R) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2))) (*.f64 -1/3 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18) (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))))))))))) (pow.f64 lambda1 3) (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18) (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18))))) -1)))))
(*.f64 (pow.f64 1 1/6) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))
(+.f64 (*.f64 (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18))))) (*.f64 -2/3 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18)))))) lambda2) (*.f64 (pow.f64 1 1/6) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))
(fma.f64 (fma.f64 -1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18))) (*.f64 -2/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18))))) lambda2 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18)) -1) lambda2 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 2/9 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18))))) (+.f64 (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))))) (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/9) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (pow.f64 1 1/3)))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18))))) (*.f64 -2/3 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18)))))) lambda2) (*.f64 (pow.f64 1 1/6) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(fma.f64 (*.f64 lambda2 lambda2) (fma.f64 2/9 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18))) (+.f64 (*.f64 (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)) (fma.f64 2/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (neg.f64 (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 1/9 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)))))) (*.f64 1/3 (*.f64 1 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (neg.f64 (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))))))) (fma.f64 (fma.f64 -1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18))) (*.f64 -2/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18))))) lambda2 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))
(fma.f64 (*.f64 lambda2 lambda2) (fma.f64 2/9 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)) (+.f64 (*.f64 (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)) (fma.f64 2/3 (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 1/9 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)))))) (*.f64 1/3 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18))))))) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18)) -1) lambda2 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))
(+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 2/9 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18))))) (+.f64 (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))))) (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/9) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (pow.f64 1 1/3)))))) (+.f64 (*.f64 (+.f64 (*.f64 (sqrt.f64 1) (*.f64 (+.f64 (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (+.f64 (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))) (*.f64 -1/27 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 7) 1/3) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 6) (pow.f64 lambda1 3)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6))))))) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))))) (*.f64 -2/9 (*.f64 (pow.f64 1 1/6) (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (*.f64 (pow.f64 R 1/9) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 17)) 1/18)))))) (*.f64 (pow.f64 R 1/3) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 1 1/3) (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (+.f64 (*.f64 -2/3 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)))) (*.f64 -1/27 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 7) 1/3) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 6) (pow.f64 lambda1 3)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6))))))))) (+.f64 (*.f64 -2/9 (*.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 4)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/9))) (*.f64 -1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (*.f64 (+.f64 (*.f64 2/3 (*.f64 (sqrt.f64 1) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 17) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2)) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (pow.f64 (/.f64 1 R) 1/3) (pow.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))))) (*.f64 1/9 (*.f64 (pow.f64 (/.f64 (*.f64 1 (pow.f64 R 14)) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/9) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 4) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (*.f64 (pow.f64 (pow.f64 R 7) 1/9) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)))))))) (pow.f64 lambda2 3)) (+.f64 (*.f64 (+.f64 (*.f64 -1/3 (*.f64 (pow.f64 1 1/6) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18))))) (*.f64 -2/3 (*.f64 (sqrt.f64 1) (*.f64 (pow.f64 (pow.f64 R 13) 1/9) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (pow.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18)))))) lambda2) (*.f64 (pow.f64 1 1/6) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(fma.f64 (*.f64 lambda2 lambda2) (fma.f64 2/9 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18))) (+.f64 (*.f64 (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)) (fma.f64 2/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (neg.f64 (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 1/9 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)))))) (*.f64 1/3 (*.f64 1 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (neg.f64 (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))))))) (fma.f64 (+.f64 (*.f64 (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)) (fma.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (fma.f64 -2/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (neg.f64 (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)))) (*.f64 -1/27 (*.f64 (cbrt.f64 (pow.f64 R 7)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 6) (pow.f64 lambda1 3)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6)))))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 -2/9 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (neg.f64 (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (*.f64 (pow.f64 R 1/18) (pow.f64 R 1/18)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 17)) 1/18))))))) (+.f64 (*.f64 1/3 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (fma.f64 -2/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (neg.f64 (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)))) (*.f64 -1/27 (*.f64 (cbrt.f64 (pow.f64 R 7)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 6) (pow.f64 lambda1 3)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6))))))) (fma.f64 -2/9 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (neg.f64 (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (fma.f64 2/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (neg.f64 (*.f64 1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 1/9 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))))))))))) (pow.f64 lambda2 3) (fma.f64 (fma.f64 -1/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18))) (*.f64 -2/3 (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18))))) lambda2 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(fma.f64 (*.f64 lambda2 lambda2) (fma.f64 2/9 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)) (+.f64 (*.f64 (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)) (fma.f64 2/3 (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 1/9 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)))))) (*.f64 1/3 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18))))))) (fma.f64 (+.f64 (*.f64 (*.f64 (cbrt.f64 R) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 1/6)) (fma.f64 2/3 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (fma.f64 -2/3 (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)))) (*.f64 -1/27 (*.f64 (*.f64 (cbrt.f64 (pow.f64 R 7)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 6) (pow.f64 lambda1 3))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6))))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 -2/9 (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (*.f64 (pow.f64 R 1/18) (pow.f64 R 1/18)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 17)) 1/18))))))) (fma.f64 1/3 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (fma.f64 -2/3 (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)))) (*.f64 -1/27 (*.f64 (*.f64 (cbrt.f64 (pow.f64 R 7)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 6) (pow.f64 lambda1 3))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/6))))) (fma.f64 -2/9 (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18) (pow.f64 (/.f64 (pow.f64 R 4) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 7)) 1/18)))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 7) 1/18) (pow.f64 (pow.f64 R 7) 1/18)) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18)) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)) (fma.f64 2/3 (*.f64 (fma.f64 1/2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))) 2)) (*.f64 R (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/3 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 17) 1/18) (pow.f64 (pow.f64 R 17) 1/18)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 19)) 1/18)))) (*.f64 (cbrt.f64 (/.f64 1 R)) (pow.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) 1/6))) (*.f64 1/9 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 lambda1 lambda1)) (*.f64 (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18) (pow.f64 (/.f64 (pow.f64 R 14) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 11)) 1/18))))))))))) (pow.f64 lambda2 3) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (pow.f64 R 13) 1/18) (pow.f64 (pow.f64 R 13) 1/18)) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))) (pow.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 5)) 1/18)) -1) lambda2 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 phi2 1/2)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 phi2 1/2)))) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 phi2 1/2)))) (fma.f64 (cos.f64 (*.f64 phi2 1/2)) (-.f64 lambda1 lambda2) (*.f64 -1/8 (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (-.f64 lambda1 lambda2))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 phi2 1/2)))) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 phi2 1/2)))) (fma.f64 (cos.f64 (*.f64 phi2 1/2)) (-.f64 lambda1 lambda2) (fma.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 phi2 1/2)))) (*.f64 -1/8 (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (-.f64 lambda1 lambda2)))))))
(+.f64 (fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 phi2 1/2)))) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (-.f64 lambda1 lambda2)))) (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 phi2 1/2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (*.f64 -1/2 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (*.f64 (*.f64 -1/2 phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (-.f64 lambda1 lambda2)))))))
(fma.f64 1/48 (*.f64 (pow.f64 phi2 3) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1)))) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 phi2 phi2) (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(*.f64 lambda2 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(*.f64 lambda2 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2))
(*.f64 lambda2 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (exp.f64 (log1p.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) 1)
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(*.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1)
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(*.f64 1 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(*.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6))
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(*.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2))
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(*.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) (pow.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) 1/3))
(*.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))) (cbrt.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))) 2)))
(*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2) (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(*.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (cbrt.f64 R))
(*.f64 (cbrt.f64 R) (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(*.f64 (cbrt.f64 R) (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 (cbrt.f64 R) (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) 1/3) (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(*.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))) (cbrt.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))) 2)))
(*.f64 (pow.f64 1 1/3) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1/3) (pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1/3))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))) (cbrt.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))))
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1)
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/3)
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) 2)
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 3)
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2))
(sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))) 2))
(fabs.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))))
(log.f64 (exp.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(log.f64 (+.f64 1 (expm1.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))))
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(expm1.f64 (log1p.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(exp.f64 (log.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(exp.f64 (*.f64 (log.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 1))
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1/3))
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(log1p.f64 (expm1.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 1)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) R)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 1 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) (*.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (*.f64 (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) R))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (sqrt.f64 R) (*.f64 (sqrt.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2) (*.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2) (*.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) R))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (cbrt.f64 R) (*.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)))
(*.f64 (cbrt.f64 R) (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))))
(*.f64 (*.f64 (cbrt.f64 R) (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))) 2))
(*.f64 (pow.f64 (cbrt.f64 R) 2) (*.f64 (cbrt.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (*.f64 R (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (*.f64 R (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2)) (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (*.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) (sqrt.f64 R)) (sqrt.f64 R))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (*.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) (pow.f64 (cbrt.f64 R) 2)) (cbrt.f64 R))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) 1) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6)) (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2)) (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (cbrt.f64 R)) (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))) 2) (*.f64 (cbrt.f64 R) (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))))
(*.f64 (pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) 3) (pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) 3))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2) 3) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))) 2))
(fabs.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))))
(log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 3) (pow.f64 R 3)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 1))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 lambda1 lambda2))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (/.f64 (neg.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (/.f64 (+.f64 (neg.f64 (*.f64 lambda1 lambda1)) (*.f64 lambda2 lambda2)) (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (/.f64 (+.f64 (pow.f64 lambda2 3) (neg.f64 (pow.f64 lambda1 3))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (/.f64 (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (/.f64 (sqrt.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (+.f64 lambda1 lambda2))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (+.f64 lambda1 lambda2))) (sqrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (+.f64 lambda1 lambda2)) (cbrt.f64 (+.f64 lambda1 lambda2)))) (cbrt.f64 (+.f64 lambda1 lambda2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sqrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (cbrt.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 2)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3) 1/3)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(sqrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 2))
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(fabs.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(log.f64 (pow.f64 (exp.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) 3))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cbrt.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log1p.f64 (expm1.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))

eval2.1s (7.3%)

Compiler

Compiled 94089 to 59576 computations (36.7% saved)

prune518.0ms (1.8%)

Pruning

55 alts after pruning (52 fresh and 3 done)

PrunedKeptTotal
New1232211253
Fresh143145
Picked101
Done235
Total1249551304
Accurracy
98.6%
Counts
1304 → 55
Alt Table
Click to see full alt table
StatusAccuracyProgram
33.1%
(fma.f64 phi2 R (-.f64 (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))) 2)) phi1) (*.f64 phi1 R)))
40.8%
(pow.f64 (pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) 2) 3)
6.9%
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 3) 1/3)
40.8%
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/3) 3)
90.7%
(pow.f64 (*.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (cbrt.f64 R)) 3)
84.8%
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 3)
80.3%
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 phi2 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
39.4%
(-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
10.0%
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
14.7%
(-.f64 (*.f64 lambda1 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1)))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
11.5%
(-.f64 (*.f64 lambda1 (*.f64 R (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
14.1%
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))))
8.9%
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda2 (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R) (*.f64 phi1 -1/2)) (*.f64 (fma.f64 -1/8 (*.f64 phi1 phi1) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) R)))))
7.1%
(-.f64 (*.f64 lambda1 (exp.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
28.1%
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1)
49.8%
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
6.7%
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) (neg.f64 R))
22.5%
(*.f64 (*.f64 lambda2 R) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (sin.f64 (*.f64 1/2 phi2))))))
22.5%
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1)))))
20.2%
(*.f64 (*.f64 lambda2 R) (-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1))
26.0%
(*.f64 (*.f64 lambda2 R) (sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))
20.2%
(*.f64 (*.f64 lambda2 R) (log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
19.5%
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 phi1)))
23.3%
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
8.0%
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)
9.3%
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
27.0%
(*.f64 (neg.f64 phi1) R)
6.7%
(*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
7.1%
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))
21.4%
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 lambda1 R)))
26.5%
(*.f64 phi2 R)
17.3%
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))
19.5%
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
8.0%
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
92.8%
(*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))
92.5%
(*.f64 R (hypot.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2) 2) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
92.2%
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) 3)) (-.f64 phi1 phi2)))
76.0%
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
54.1%
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
92.6%
(*.f64 R (hypot.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (*.f64 (-.f64 lambda1 lambda2) -1)) (-.f64 phi1 phi2)))
62.3%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (-.f64 phi1 phi2)))
92.6%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)) (-.f64 phi1 phi2)))
92.7%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1)) (-.f64 phi1 phi2)))
56.7%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (cos.f64 (*.f64 1/2 phi2))))) (-.f64 phi1 phi2)))
69.1%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))) (-.f64 phi1 phi2)))
73.1%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 -1/2 phi2) (sin.f64 (*.f64 1/2 phi1))))) (-.f64 phi1 phi2)))
81.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2)))))) (-.f64 phi1 phi2)))
81.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi2))) (-.f64 phi1 phi2)))
86.7%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
67.1%
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (-.f64 phi1 phi2)))
69.3%
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2)))
39.4%
(*.f64 R (hypot.f64 (expm1.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))) (-.f64 phi1 phi2)))
49.8%
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
20.2%
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
38.9%
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3))
Compiler

Compiled 2362 to 1724 computations (27% saved)

localize40.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
99.9%
(*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))
99.7%
(pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1)
99.6%
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
94.9%
(cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))
Compiler

Compiled 102 to 51 computations (50% saved)

series63.0ms (0.2%)

Counts
3 → 156
Calls

39 calls:

TimeVariablePointExpression
17.0ms
phi2
@0
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
7.0ms
phi2
@0
(pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1)
5.0ms
phi2
@0
(*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))
4.0ms
lambda2
@-inf
(*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))
3.0ms
phi1
@0
(*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))

rewrite245.0ms (0.9%)

Algorithm
batch-egg-rewrite
Rules
1278×associate-/l*
1172×associate-/r/
462×add-sqr-sqrt
450×*-un-lft-identity
446×pow1
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
021135
1452111
25859111
Stop Event
node limit
Counts
3 → 210
Calls
Call 1
Inputs
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1)
(*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))
Outputs
(((-.f64 (exp.f64 (log1p.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 1 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 -1 (neg.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (/.f64 1 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 -1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) 1) (/.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (/.f64 1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2))) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (-.f64 lambda1 lambda2))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 lambda1 (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (*.f64 -1 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (*.f64 -1 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((neg.f64 (/.f64 -1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((sqrt.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -2) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((log.f64 (exp.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (/.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (neg.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)))
(((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (-.f64 lambda1 lambda2) (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 -1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 -1 (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 -1 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (-.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1) (neg.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))) (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (cbrt.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (cbrt.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) 1) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) -1) (pow.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1) (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (pow.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) -1) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (/.f64 1 (-.f64 lambda1 lambda2))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (neg.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (*.f64 -1 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (neg.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 1 (neg.f64 (/.f64 -1 (-.f64 lambda1 lambda2)))) (neg.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (-.f64 lambda1 lambda2) -1) (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 1 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 1 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2))) (cbrt.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1) (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (/.f64 -1 (-.f64 lambda1 lambda2)))) (sqrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (-.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda2 (+.f64 lambda1 lambda2)) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (+.f64 (pow.f64 (*.f64 lambda1 lambda1) 3) (pow.f64 (*.f64 lambda2 (+.f64 lambda1 lambda2)) 3))) (+.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (-.f64 (*.f64 (*.f64 lambda2 (+.f64 lambda1 lambda2)) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) 1) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (cbrt.f64 (/.f64 -1 (-.f64 lambda1 lambda2)))) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1) (-.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) -1) (neg.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (/.f64 1 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2))) (cbrt.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) 1) (sqrt.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 -1)) (sqrt.f64 (neg.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) 1) (cbrt.f64 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) -1) (cbrt.f64 (neg.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 1 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 1 (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (-.f64 lambda1 lambda2) (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (-.f64 lambda1 lambda2) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 -1 (neg.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 -1 (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (neg.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (cbrt.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 1 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (neg.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (/.f64 1 (*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 -1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 1 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (sqrt.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (sqrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (sqrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (sqrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (/.f64 1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1) (/.f64 -1 (-.f64 lambda1 lambda2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (neg.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (neg.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))) (/.f64 1 (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (+.f64 (sqrt.f64 lambda2) (sqrt.f64 lambda1)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (sqrt.f64 lambda1) (sqrt.f64 lambda2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1/4) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1/4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) 1) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 1 -1/2) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) -1/2) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1/2) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) -1/2) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) -1) (/.f64 1 (pow.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1) (/.f64 1 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((/.f64 (pow.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) -1) (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((log.f64 (exp.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (+.f64 (log.f64 (-.f64 lambda1 lambda2)) (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (-.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (log.f64 (-.f64 lambda1 lambda2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)) 3) (pow.f64 R 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))) #f)))

simplify275.0ms (1%)

Algorithm
egg-herbie
Rules
962×+-commutative
902×associate-/r*
896×associate-/l*
870×associate-*r/
822×*-commutative
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0115137302
1398836890
Stop Event
node limit
Counts
366 → 550
Calls
Call 1
Inputs
(/.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 3) (*.f64 (pow.f64 lambda2 4) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (/.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (/.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 4))))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (/.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (/.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 4))))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (/.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (/.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 4))))))
(/.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 3) (*.f64 (pow.f64 lambda2 4) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 3) (*.f64 (pow.f64 lambda2 4) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 phi1 2))))
(+.f64 (*.f64 -1 (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/16 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))) (*.f64 1/48 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 phi1 2)))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi2 2) (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/16 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 1/48 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))))) (pow.f64 phi2 3))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi2 2) (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2)))))))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2)))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1 (/.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) lambda2)) (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda2 2))) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda2 2)))) (pow.f64 lambda1 3))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) lambda1)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) lambda1)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 -1 (*.f64 lambda2 (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))))) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1))))
(+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (*.f64 lambda2 (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (*.f64 -1 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (pow.f64 lambda1 2))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (pow.f64 lambda2 3))) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) lambda2)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) lambda2)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (*.f64 -1 (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))))) (pow.f64 lambda2 2))) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) lambda2)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) lambda2) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) lambda2)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) lambda2) (+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 -1 (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) lambda1) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))))) (pow.f64 lambda2 2)))))))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 -1 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (pow.f64 phi1 2)))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (pow.f64 phi1 2))) (*.f64 -1 (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 -1/2 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/16 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))) (*.f64 1/48 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))))))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2)))))) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (*.f64 -1/16 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (*.f64 1/48 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (pow.f64 phi2 3))) (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))))) (*.f64 lambda2 (*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))))) (*.f64 lambda2 (*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 lambda2 (*.f64 (+.f64 (*.f64 -1 (/.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) lambda2)) (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda2 2))) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda2 2)))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))))) (*.f64 -1 (*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (*.f64 -1 (/.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))))) (*.f64 lambda2 (*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 R (pow.f64 lambda1 3))))))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (*.f64 -1 (*.f64 lambda2 (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (*.f64 -1 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 2 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))))) (*.f64 -1 (*.f64 lambda2 (-.f64 (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))))
(*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 2 (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (*.f64 lambda2 (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (*.f64 -1 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 2 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))))) (*.f64 lambda2 (-.f64 (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1)))) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 R (-.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))) (*.f64 -1 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1)))) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1)))) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) lambda1))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))))))) (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3)) (+.f64 (*.f64 -1 (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))))))))) (*.f64 -1 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2)) lambda1))) R) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) lambda1))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) lambda1) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) lambda1)) R) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R)
(+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 phi1 2) (*.f64 R (-.f64 (+.f64 1 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/16 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))) (*.f64 1/48 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (+.f64 1 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2))) (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 (pow.f64 phi1 3) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 phi1 2) (*.f64 R (-.f64 (+.f64 1 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 phi1 R)
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2))) phi1)) (*.f64 phi1 R)))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2))) phi1)) (+.f64 (*.f64 phi1 R) (*.f64 1/2 (/.f64 (*.f64 R (*.f64 phi2 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)))) (pow.f64 phi1 2))))))
(*.f64 -1 (*.f64 phi1 R))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (*.f64 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi1 2))) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R)
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (*.f64 (pow.f64 phi2 2) (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (-.f64 lambda1 lambda2)))) 1)) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R)))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (*.f64 (pow.f64 phi2 2) (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (-.f64 lambda1 lambda2)))) 1)) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2)))))) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (*.f64 -1/16 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (*.f64 1/48 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (-.f64 lambda1 lambda2)))))) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (-.f64 lambda1 lambda2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))) (*.f64 R (pow.f64 phi2 3))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R phi2)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2))) phi2))))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (+.f64 (*.f64 1/2 (/.f64 (*.f64 phi1 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2)))) (pow.f64 phi2 2))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2))) phi2)))))
(*.f64 -1 (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi2 2))) (+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2)))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1)
(*.f64 1 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(*.f64 -1 (neg.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2))
(*.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (/.f64 1 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 1 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 1 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 -1 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2))
(*.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) 1) (/.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (/.f64 1 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 1 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2))) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 1 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (-.f64 lambda1 lambda2))) -1)
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 lambda1 (neg.f64 lambda2)))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(*.f64 (/.f64 (*.f64 -1 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 (*.f64 -1 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1)
(pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)
(pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 3)
(pow.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) 1/3)
(neg.f64 (/.f64 -1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(sqrt.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -2) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)))
(log.f64 (exp.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(cbrt.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3))
(cbrt.f64 (/.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)))
(expm1.f64 (log1p.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(exp.f64 (neg.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1))
(log1p.f64 (expm1.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1)
(*.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(*.f64 (-.f64 lambda1 lambda2) (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))
(*.f64 -1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 lambda1 lambda2))))
(*.f64 -1 (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 -1 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2)))
(*.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2)))
(*.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (-.f64 lambda1 lambda2))
(*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1) (neg.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))) (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) 1) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) -1) (pow.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1))
(*.f64 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1) (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) -1) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (/.f64 1 (-.f64 lambda1 lambda2))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (neg.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 1 (*.f64 -1 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (neg.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 1 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 1 (neg.f64 (/.f64 -1 (-.f64 lambda1 lambda2)))) (neg.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) -1) (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 1 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 1 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2))) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1) (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (/.f64 -1 (-.f64 lambda1 lambda2)))) (sqrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 lambda1 lambda2))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (-.f64 lambda1 lambda2))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda2))))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda2 (+.f64 lambda1 lambda2)) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (+.f64 (pow.f64 (*.f64 lambda1 lambda1) 3) (pow.f64 (*.f64 lambda2 (+.f64 lambda1 lambda2)) 3))) (+.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (-.f64 (*.f64 (*.f64 lambda2 (+.f64 lambda1 lambda2)) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(*.f64 (/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) 1) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (cbrt.f64 (/.f64 -1 (-.f64 lambda1 lambda2)))) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1) (-.f64 lambda1 lambda2))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) -1) (neg.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (/.f64 1 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2))) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) 1) (sqrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 -1)) (sqrt.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) 1) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) -1) (cbrt.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(/.f64 1 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 1 (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)))
(/.f64 (-.f64 lambda1 lambda2) (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (-.f64 lambda1 lambda2) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1))
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2)))
(/.f64 -1 (neg.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 -1 (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(/.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (neg.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2))))
(/.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)))
(/.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (cbrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))))
(/.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 1 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)))
(/.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)))
(/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (neg.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (/.f64 1 (*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 -1 (-.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 1 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (sqrt.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(/.f64 (sqrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (sqrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(/.f64 (sqrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))))
(/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))))
(/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))))
(/.f64 (*.f64 (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(/.f64 (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (/.f64 1 (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2))
(/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1) (/.f64 -1 (-.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (neg.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))) (/.f64 1 (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (sqrt.f64 lambda2) (sqrt.f64 lambda1)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (sqrt.f64 lambda1) (sqrt.f64 lambda2))))
(/.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1/4) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1/4)))
(/.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) 1) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (pow.f64 1 -1/2) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) -1/2) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1/2)))
(/.f64 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1/2) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1/2)))
(/.f64 (pow.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) -1/2) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1/2)))
(/.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) -1) (/.f64 1 (pow.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1)))
(/.f64 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1) (/.f64 1 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1)))
(/.f64 (pow.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) -1) (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1)))
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(log.f64 (exp.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3)))
(cbrt.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3)))
(expm1.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(exp.f64 (+.f64 (log.f64 (-.f64 lambda1 lambda2)) (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(exp.f64 (-.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (log.f64 (-.f64 lambda1 lambda2)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1))
(log1p.f64 (expm1.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))))) 1)
(pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))) 1)
(pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))) 2)
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))) 3)
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))) 2))
(log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))))))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))) 3))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)) 3)))
(cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)) 3) (pow.f64 R 3)))
(expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))))
(exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))) 1))
(log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))))
Outputs
(/.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (/.f64 -1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (neg.f64 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 -1 (+.f64 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (*.f64 -1 (+.f64 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 lambda1 (/.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1)))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 3) (*.f64 (pow.f64 lambda2 4) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (fma.f64 -1 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 -1 (+.f64 (/.f64 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (fma.f64 -1 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 -1 (+.f64 (/.f64 lambda1 (/.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1)) (/.f64 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (/.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(+.f64 (+.f64 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 lambda1 3))) (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (+.f64 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 lambda1 3))))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (/.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 4))))))
(+.f64 (+.f64 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 lambda1 3))) (+.f64 (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 4)))))
(+.f64 (+.f64 (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (+.f64 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 lambda1 3))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (/.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(+.f64 (+.f64 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 lambda1 3))) (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (+.f64 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 lambda1 3))))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (/.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 4))))))
(+.f64 (+.f64 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 lambda1 3))) (+.f64 (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 4)))))
(+.f64 (+.f64 (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (+.f64 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 lambda1 3))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(+.f64 (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (/.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(+.f64 (+.f64 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 lambda1 3))) (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (+.f64 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 lambda1 3))))
(+.f64 (/.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (/.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 4))))))
(+.f64 (+.f64 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 lambda1 3))) (+.f64 (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 4)))))
(+.f64 (+.f64 (/.f64 1 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (/.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 4)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (+.f64 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 lambda1 3))))
(/.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (/.f64 -1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (neg.f64 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 -1 (+.f64 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (*.f64 -1 (+.f64 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 lambda1 (/.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1)))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 3) (*.f64 (pow.f64 lambda2 4) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (fma.f64 -1 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 -1 (+.f64 (/.f64 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (fma.f64 -1 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 -1 (+.f64 (/.f64 lambda1 (/.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1)) (/.f64 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (/.f64 -1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (neg.f64 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 -1 (+.f64 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (*.f64 -1 (+.f64 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 lambda1 (/.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1)))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 lambda1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 lambda1 3) (*.f64 (pow.f64 lambda2 4) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 -1 (/.f64 (pow.f64 lambda1 2) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (/.f64 1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (fma.f64 -1 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 -1 (+.f64 (/.f64 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(-.f64 (fma.f64 -1 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 -1 (+.f64 (/.f64 lambda1 (/.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1)) (/.f64 (/.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 4)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 (/.f64 1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))
(fma.f64 1/2 (/.f64 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (-.f64 lambda1 lambda2)) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 phi1 2))))
(+.f64 (fma.f64 1/2 (/.f64 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (-.f64 lambda1 lambda2)) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 phi1 phi1)))
(+.f64 (fma.f64 1/2 (/.f64 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (-.f64 lambda1 lambda2)) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 phi1 phi1)))
(+.f64 (*.f64 -1 (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/16 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))) (*.f64 1/48 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 phi1 2)))))
(fma.f64 -1 (*.f64 (pow.f64 phi1 3) (fma.f64 -1/2 (/.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2)))) (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) -1/24))) (+.f64 (fma.f64 1/2 (/.f64 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (-.f64 lambda1 lambda2)) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 phi1 phi1))))
(fma.f64 -1 (*.f64 (pow.f64 phi1 3) (fma.f64 -1/2 (/.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2)))) (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) -1/24))) (+.f64 (fma.f64 1/2 (/.f64 (/.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2)) (-.f64 lambda1 lambda2)) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 phi1 phi1))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1))))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1))))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1))))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1))))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 1 (cos.f64 (*.f64 1/2 phi1))) (-.f64 lambda1 lambda2))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))))
(fma.f64 1/2 (*.f64 (/.f64 phi2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (/.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (/.f64 (/.f64 1 (cos.f64 (*.f64 1/2 phi1))) (-.f64 lambda1 lambda2)))
(fma.f64 1/2 (*.f64 (/.f64 phi2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (/.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi2 2) (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))))))
(+.f64 (fma.f64 1/2 (*.f64 (/.f64 phi2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (/.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (/.f64 (/.f64 1 (cos.f64 (*.f64 1/2 phi1))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))))))
(+.f64 (fma.f64 1/2 (*.f64 (/.f64 phi2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (/.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/16 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 1/48 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))))) (pow.f64 phi2 3))) (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi2 2) (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2)))))))))
(fma.f64 1/2 (*.f64 (/.f64 phi2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (/.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (fma.f64 -1 (*.f64 (pow.f64 phi2 3) (fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))))) (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) -1/24))) (+.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 1/2 phi1))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))))))))
(fma.f64 1/2 (*.f64 (/.f64 phi2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (/.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (fma.f64 -1 (*.f64 (pow.f64 phi2 3) (fma.f64 -1/2 (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))) (/.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) -1/24) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (+.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2))))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2))))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2))))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))))
(/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2)))
(/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2))))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(fma.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1 (fma.f64 -1 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (*.f64 lambda1 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2))))
(+.f64 (neg.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1 (/.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) lambda2)) (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda2 2))) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda2 2)))) (pow.f64 lambda1 3))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1 (*.f64 (pow.f64 lambda1 3) (fma.f64 -1 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) lambda2) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda2 lambda2))))) (fma.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1 (fma.f64 -1 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (*.f64 lambda1 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2)))))
(fma.f64 -1 (*.f64 (pow.f64 lambda1 3) (fma.f64 -1 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) lambda2) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) lambda1)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(fma.f64 -1 (/.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) lambda1) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) lambda1)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 -1 (*.f64 lambda2 (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))))) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1 (/.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) lambda1) (fma.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1 (fma.f64 -1 (/.f64 (fma.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (fma.f64 -1 (*.f64 lambda2 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (neg.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (*.f64 lambda1 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2)))))
(+.f64 (fma.f64 -1 (/.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) lambda1) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (neg.f64 (/.f64 (fma.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (fma.f64 -1 (*.f64 lambda2 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (neg.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (*.f64 lambda1 lambda1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1))))
(fma.f64 -1 (/.f64 (*.f64 lambda2 lambda2) (/.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 lambda2) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (+.f64 (*.f64 (*.f64 lambda2 lambda2) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (*.f64 lambda2 (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (*.f64 -1 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (pow.f64 lambda1 2))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) lambda1)))))
(fma.f64 -1 (/.f64 (fma.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (fma.f64 lambda2 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (*.f64 lambda1 lambda1)) (fma.f64 -1 (/.f64 (*.f64 lambda2 lambda2) (/.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (*.f64 lambda2 lambda2) (/.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1 (/.f64 (fma.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (fma.f64 lambda2 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (*.f64 lambda1 lambda1)) (fma.f64 -1 (*.f64 (*.f64 lambda2 lambda2) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (+.f64 (*.f64 (*.f64 lambda2 lambda2) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 lambda2) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (pow.f64 lambda2 3))) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1 (*.f64 (*.f64 lambda2 lambda2) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (fma.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1 (*.f64 -1 (+.f64 (*.f64 (pow.f64 lambda2 3) (fma.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)) (fma.f64 -1 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(+.f64 (fma.f64 -1 (*.f64 (*.f64 lambda2 lambda2) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (pow.f64 lambda2 3) (fma.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)) (fma.f64 -1 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) lambda2)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(fma.f64 -1 (/.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) lambda2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(fma.f64 -1 (/.f64 0 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) lambda2)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))) (*.f64 -1 (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))))) (pow.f64 lambda2 2))) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1 (/.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) lambda2) (fma.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1 (fma.f64 -1 (/.f64 (+.f64 (*.f64 0 (*.f64 (pow.f64 lambda1 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 lambda1 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))))) (*.f64 lambda2 lambda2)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2)))))
(+.f64 (fma.f64 -1 (/.f64 0 (/.f64 (/.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 lambda1 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))))) (*.f64 0 (*.f64 (pow.f64 lambda1 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 lambda2 lambda2))))
(*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) lambda2)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) lambda2) (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)) lambda2) (fma.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2)) (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)) lambda2))))
(fma.f64 -1 (*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 lambda1 lambda1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) lambda2)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) lambda2) (+.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 -1 (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) lambda1) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))))) (pow.f64 lambda2 2)))))))
(fma.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)) lambda2) (fma.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1 (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)) lambda2) (*.f64 -1 (+.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (fma.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) lambda1 (*.f64 0 (*.f64 (pow.f64 lambda1 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 lambda2 lambda2)))))))
(+.f64 (fma.f64 -1 (*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 lambda1 lambda1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (neg.f64 (/.f64 (fma.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) lambda1 (*.f64 0 (*.f64 (pow.f64 lambda1 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 lambda2 lambda2))))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (*.f64 -1 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (pow.f64 phi1 2)))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi2)))) (fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (*.f64 phi1 phi1) (fma.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi2)))) (fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (*.f64 phi1 phi1) (fma.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (pow.f64 phi1 2))) (*.f64 -1 (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 -1/2 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/16 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))) (*.f64 1/48 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))))))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi2)))) (fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (*.f64 -1 (+.f64 (*.f64 (*.f64 phi1 phi1) (fma.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))) (*.f64 (pow.f64 phi1 3) (fma.f64 -1/2 (*.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (fma.f64 -1/2 (/.f64 (fma.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2)))) (neg.f64 (*.f64 (fma.f64 -1/2 (/.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2)))) (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) -1/24)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi2)))) (fma.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2) (*.f64 -1 (+.f64 (*.f64 (*.f64 phi1 phi1) (fma.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))) (*.f64 (pow.f64 phi1 3) (fma.f64 -1/2 (*.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (fma.f64 -1/2 (*.f64 (/.f64 (fma.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))) (cos.f64 (*.f64 1/2 phi2))) (sin.f64 (*.f64 1/2 phi2))) (neg.f64 (*.f64 (fma.f64 -1/2 (/.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2)))) (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) -1/24)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (*.f64 (*.f64 -1/2 phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1)))) (neg.f64 (*.f64 (*.f64 phi2 phi2) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1)))) (neg.f64 (*.f64 (*.f64 phi2 phi2) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2)))))) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (*.f64 -1/16 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (*.f64 1/48 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (pow.f64 phi2 3))) (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (+.f64 (*.f64 (pow.f64 phi2 3) (fma.f64 -1/2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (fma.f64 -1/2 (/.f64 (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (neg.f64 (*.f64 (fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))))) (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) -1/24)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (*.f64 phi2 phi2) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2) (fma.f64 -1/2 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (+.f64 (*.f64 (*.f64 phi2 phi2) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (pow.f64 phi2 3) (fma.f64 -1/2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (fma.f64 -1/2 (*.f64 (/.f64 (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (cos.f64 (*.f64 1/2 phi1))) (sin.f64 (*.f64 1/2 phi1))) (neg.f64 (*.f64 (fma.f64 -1/2 (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))) (/.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) -1/24) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))))) (*.f64 lambda2 (*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 R (*.f64 lambda1 lambda1)) (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (*.f64 lambda2 (+.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 R (*.f64 (pow.f64 lambda1 2) (-.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))))) (*.f64 lambda2 (*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 lambda2 (*.f64 (+.f64 (*.f64 -1 (/.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) lambda2)) (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda2 2))) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda2 2)))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))))) (*.f64 -1 (*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (*.f64 -1 (/.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))))) (*.f64 lambda2 (*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2) (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 R (pow.f64 lambda1 3))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 R (*.f64 lambda1 lambda1)) (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (*.f64 lambda2 (+.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 (-.f64 (fma.f64 2 (*.f64 lambda2 (*.f64 (fma.f64 -1 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) lambda2) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 -1 (+.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (neg.f64 (/.f64 lambda2 (/.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (*.f64 lambda2 (+.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2)))))))) (*.f64 (pow.f64 lambda1 3) R))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 lambda2 R) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 R (*.f64 lambda1 lambda1)) (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (*.f64 lambda2 (+.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 (-.f64 (fma.f64 2 (*.f64 lambda2 (*.f64 (fma.f64 -1 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) lambda2) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 -1 (+.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (/.f64 (neg.f64 lambda2) (/.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (*.f64 lambda2 (+.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (pow.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))) 2))))))) (*.f64 (pow.f64 lambda1 3) R))))))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R)
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(fma.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 -2 (*.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2)) 2)) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R)) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R)))
(fma.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 -2 (*.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2)) 2)) (/.f64 lambda1 (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R)))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (*.f64 -1 (*.f64 lambda2 (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (*.f64 -1 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 2 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))))) (*.f64 -1 (*.f64 lambda2 (-.f64 (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (fma.f64 1/2 (*.f64 (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (-.f64 (fma.f64 -2 (*.f64 (fma.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (fma.f64 -1 (*.f64 lambda2 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (neg.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 2 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (*.f64 (neg.f64 lambda2) (-.f64 (fma.f64 -2 (*.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2)) 2)))) (*.f64 lambda1 lambda1))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 -2 (*.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2)) 2)) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R)) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (fma.f64 1/2 (*.f64 (/.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (-.f64 (fma.f64 -2 (*.f64 (fma.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (fma.f64 -1 (*.f64 lambda2 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (neg.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 2 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (*.f64 (neg.f64 lambda2) (-.f64 (fma.f64 -2 (*.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2)) 2))))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 -2 (*.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 lambda2)) 2)) (/.f64 lambda1 (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R))))
(*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(neg.f64 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R) (fma.f64 -1/2 (/.f64 (-.f64 (fma.f64 2 (*.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R)) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R) (fma.f64 -1/2 (/.f64 (-.f64 (fma.f64 2 (*.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (/.f64 lambda1 (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 2 (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (*.f64 lambda2 (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (*.f64 -1 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 2 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))))) (*.f64 lambda2 (-.f64 (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) R) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R) (fma.f64 1/2 (*.f64 (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (-.f64 (*.f64 2 (+.f64 (*.f64 (fma.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (fma.f64 lambda2 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (*.f64 lambda2 (-.f64 (fma.f64 2 (*.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) (*.f64 lambda1 lambda1))) (fma.f64 -1/2 (/.f64 (-.f64 (fma.f64 2 (*.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R)) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R) (fma.f64 1/2 (*.f64 (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (-.f64 (*.f64 2 (+.f64 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 (fma.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (fma.f64 lambda2 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 lambda2 (-.f64 (fma.f64 2 (*.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) (*.f64 lambda1 lambda1))) (fma.f64 -1/2 (/.f64 (-.f64 (fma.f64 2 (*.f64 (*.f64 0 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (/.f64 lambda1 (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1)))) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 (*.f64 1/2 (*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (*.f64 (*.f64 -2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (*.f64 (*.f64 lambda2 lambda2) R))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 R (-.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))) (*.f64 -1 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1)))) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1)))) (pow.f64 (*.f64 -1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) lambda1) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (*.f64 (pow.f64 lambda2 2) R)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 (pow.f64 lambda2 3) R) (-.f64 (fma.f64 -2 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)) (fma.f64 -1 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))) (neg.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (*.f64 (*.f64 -2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))))))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (*.f64 (*.f64 -2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (*.f64 (*.f64 lambda2 lambda2) R)))))))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 R (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (*.f64 (*.f64 -2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (*.f64 (*.f64 lambda2 lambda2) R))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (*.f64 (pow.f64 lambda2 3) R) (-.f64 (fma.f64 -2 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 -1 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)) (fma.f64 -1 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) lambda1) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))) (neg.f64 (/.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (-.f64 (*.f64 (*.f64 -2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 lambda1 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))) (pow.f64 (neg.f64 (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))))))))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R) (fma.f64 1/2 (/.f64 R (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (fma.f64 2 (*.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (neg.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R) (fma.f64 1/2 (*.f64 (/.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (fma.f64 2 (*.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (neg.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) lambda1))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))))))) (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3)) (+.f64 (*.f64 -1 (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))))))))) (*.f64 -1 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)) 2)) lambda1))) R) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R) (fma.f64 1/2 (/.f64 R (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (fma.f64 2 (*.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (neg.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)))) (fma.f64 1/2 (*.f64 (/.f64 (-.f64 (fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) (fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (*.f64 0 (*.f64 (pow.f64 lambda1 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 lambda1 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))))))))) (neg.f64 (*.f64 lambda1 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (fma.f64 2 (*.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (neg.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2))))) (*.f64 lambda2 lambda2)) (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R) (fma.f64 1/2 (*.f64 (/.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (fma.f64 2 (*.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (neg.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2))) (fma.f64 1/2 (*.f64 (/.f64 (-.f64 (fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) (fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (neg.f64 (*.f64 lambda1 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))))) (*.f64 0 (*.f64 (pow.f64 lambda1 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))) (neg.f64 (*.f64 lambda1 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (fma.f64 2 (*.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (neg.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2))))) (*.f64 lambda2 lambda2)) (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (neg.f64 lambda2) (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))
(fma.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1))))
(fma.f64 -1/2 (/.f64 R (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (fma.f64 -2 (*.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) (fma.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R)))
(fma.f64 -1/2 (*.f64 (/.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (fma.f64 -2 (*.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (fma.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R)))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2))) (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) lambda1))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2))))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))) lambda1) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 3))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 lambda1 2)) (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 lambda1 2)))))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1) 2)) lambda1)) R) (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) lambda1)))))
(fma.f64 -1/2 (/.f64 R (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (fma.f64 -2 (*.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) (fma.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (fma.f64 1/2 (*.f64 (/.f64 (-.f64 (fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) (fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) lambda1 (*.f64 0 (*.f64 (pow.f64 lambda1 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 lambda1 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (fma.f64 -2 (*.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) (*.f64 lambda2 lambda2)) (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R))))
(fma.f64 -1/2 (*.f64 (/.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (fma.f64 -2 (*.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (fma.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (fma.f64 1/2 (*.f64 (/.f64 (-.f64 (fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) (fma.f64 -1 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) lambda1 (*.f64 0 (*.f64 (pow.f64 lambda1 3) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 lambda1 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (*.f64 lambda1 lambda1) (fma.f64 -2 (*.f64 (*.f64 0 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 phi1 phi2) 2))) (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) (*.f64 lambda2 lambda2)) (/.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) R))))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R)
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R (*.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (*.f64 phi1 R))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 phi1 2) (*.f64 R (-.f64 (+.f64 1 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(fma.f64 1/2 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 R (-.f64 (+.f64 1 (fma.f64 -2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (fma.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (fma.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R (*.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (*.f64 phi1 R))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 1/2 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 R (+.f64 (fma.f64 -2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (fma.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (-.f64 1 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (fma.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R (*.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (*.f64 phi1 R))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/16 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))) (*.f64 1/48 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (-.f64 (+.f64 1 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2))) (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 (pow.f64 phi1 3) R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 phi1 2) (*.f64 R (-.f64 (+.f64 1 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3) (-.f64 lambda1 lambda2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi2))))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi2)) (*.f64 phi1 R)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (+.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi2))) (*.f64 (*.f64 -2 (fma.f64 -1/2 (*.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (fma.f64 -1/2 (/.f64 (fma.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2)))) (neg.f64 (*.f64 (fma.f64 -1/2 (/.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2)))) (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) -1/24)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (/.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (-.f64 (+.f64 1 (fma.f64 -2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (fma.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 (pow.f64 phi1 3) R))) (fma.f64 1/2 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 R (-.f64 (+.f64 1 (fma.f64 -2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (fma.f64 (-.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (fma.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R (*.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (*.f64 phi1 R))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (+.f64 (fma.f64 (fma.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi2))) (*.f64 (*.f64 -2 (fma.f64 -1/2 (*.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (fma.f64 -1/2 (*.f64 (/.f64 (fma.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))))) (cos.f64 (*.f64 1/2 phi2))) (sin.f64 (*.f64 1/2 phi2))) (neg.f64 (*.f64 (fma.f64 -1/2 (/.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2)))) (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2))) -1/24)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (*.f64 (/.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 (fma.f64 -2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (fma.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (-.f64 1 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 (pow.f64 phi1 3) R))) (fma.f64 1/2 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 R (+.f64 (fma.f64 -2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)) (fma.f64 (+.f64 (/.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2))) (*.f64 1/4 (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 3)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (-.f64 1 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (fma.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) R (*.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2))) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 phi2 -2)) (*.f64 phi1 R))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi2)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 phi1 R)
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(fma.f64 -1 (*.f64 phi2 R) (*.f64 phi1 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2))) phi1)) (*.f64 phi1 R)))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 1/2 (/.f64 R (/.f64 phi1 (-.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 phi1 R)))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 1/2 (*.f64 (/.f64 R phi1) (+.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (-.f64 (*.f64 phi2 phi2) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 phi1 R)))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2))) phi1)) (+.f64 (*.f64 phi1 R) (*.f64 1/2 (/.f64 (*.f64 R (*.f64 phi2 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)))) (pow.f64 phi1 2))))))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 1/2 (/.f64 R (/.f64 phi1 (-.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (pow.f64 (neg.f64 phi2) 2)))) (fma.f64 phi1 R (/.f64 (*.f64 1/2 (*.f64 (*.f64 phi2 R) (-.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2))) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 phi1 phi1)))))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 1/2 (*.f64 (/.f64 R phi1) (+.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (-.f64 (*.f64 phi2 phi2) (pow.f64 (neg.f64 phi2) 2)))) (fma.f64 phi1 R (/.f64 (*.f64 1/2 (*.f64 (*.f64 phi2 R) (+.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)) (-.f64 (*.f64 phi2 phi2) (pow.f64 (neg.f64 phi2) 2))))) (*.f64 phi1 phi1)))))
(*.f64 -1 (*.f64 phi1 R))
(*.f64 (neg.f64 phi1) R)
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(fma.f64 R phi2 (*.f64 (neg.f64 phi1) R))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1))))
(fma.f64 R phi2 (fma.f64 -1 (*.f64 phi1 R) (/.f64 (*.f64 -1/2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))) 2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) R))) phi1)))
(+.f64 (*.f64 R phi2) (+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (*.f64 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi1 2))) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))) 2) (*.f64 R (pow.f64 (-.f64 lambda1 lambda2) 2))) phi1)))))
(fma.f64 R phi2 (fma.f64 -1 (*.f64 phi1 R) (*.f64 -1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))) 2) (/.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi2 R) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))) 2) (/.f64 phi1 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) R)))))))
(fma.f64 R phi2 (fma.f64 -1 (*.f64 phi1 R) (*.f64 -1/2 (+.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))) 2) phi1) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) R)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1)))) 2) (/.f64 phi1 (/.f64 (*.f64 (*.f64 phi2 R) (pow.f64 (-.f64 lambda1 lambda2) 2)) phi1)))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R)
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R))
(fma.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (*.f64 (pow.f64 phi2 2) (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (-.f64 lambda1 lambda2)))) 1)) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R)))
(fma.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (*.f64 R (*.f64 phi2 phi2)) (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (fma.f64 -2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (-.f64 lambda1 lambda2)) 1)) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))
(fma.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (*.f64 R (*.f64 phi2 phi2)) (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (fma.f64 -2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (-.f64 lambda1 lambda2)) 1)) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 R (*.f64 (pow.f64 phi2 2) (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (-.f64 lambda1 lambda2)))) 1)) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2)))))) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (*.f64 -1/16 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))) (*.f64 1/48 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (-.f64 lambda1 lambda2)))))) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (-.f64 (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 1 (*.f64 -2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (*.f64 1/8 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)))) (*.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (-.f64 lambda1 lambda2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 -2 phi1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))) (*.f64 R (pow.f64 phi2 3))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))
(fma.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (*.f64 R (*.f64 phi2 phi2)) (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (fma.f64 -2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (-.f64 lambda1 lambda2)) 1)) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (*.f64 (*.f64 1/2 (*.f64 (+.f64 (fma.f64 -2 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (fma.f64 -1/2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (fma.f64 -1/2 (/.f64 (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (neg.f64 (*.f64 (fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))))) (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) -1/24)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/2 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1))) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1))) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (*.f64 -1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (fma.f64 -2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 1/8 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))) (/.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (-.f64 lambda1 lambda2)) 1)) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))) (*.f64 (pow.f64 phi2 3) R))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))
(fma.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (*.f64 R (*.f64 phi2 phi2)) (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (fma.f64 -2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (-.f64 lambda1 lambda2)) 1)) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)))) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (*.f64 (*.f64 1/2 (*.f64 (+.f64 (fma.f64 -2 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (fma.f64 -1/2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (fma.f64 -1/2 (*.f64 (/.f64 (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (cos.f64 (*.f64 1/2 phi1))) (sin.f64 (*.f64 1/2 phi1))) (neg.f64 (*.f64 (fma.f64 -1/2 (*.f64 (/.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))) (/.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) -1/24) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 1/2 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1))) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 1/2 phi1))) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (*.f64 -1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (*.f64 (-.f64 (fma.f64 1/4 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (fma.f64 -2 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (fma.f64 -1/4 (/.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (/.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (/.f64 (/.f64 1/8 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 phi1))) (/.f64 -1/4 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (-.f64 lambda1 lambda2)) 1)) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 (-.f64 lambda1 lambda2) 2))) (*.f64 phi1 -2)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) 2)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))) (*.f64 (pow.f64 phi2 3) R))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))
(*.f64 R phi2)
(*.f64 phi2 R)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(fma.f64 R phi2 (*.f64 (neg.f64 phi1) R))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2))) phi2))))
(fma.f64 -1 (*.f64 phi1 R) (fma.f64 R phi2 (*.f64 1/2 (/.f64 R (/.f64 phi2 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2)))))))
(fma.f64 -1 (*.f64 phi1 R) (fma.f64 R phi2 (*.f64 1/2 (*.f64 (/.f64 R phi2) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2))))))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (+.f64 (*.f64 R phi2) (+.f64 (*.f64 1/2 (/.f64 (*.f64 phi1 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2)))) (pow.f64 phi2 2))) (*.f64 1/2 (/.f64 (*.f64 R (-.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (pow.f64 (*.f64 -1 phi1) 2))) phi2)))))
(fma.f64 -1 (*.f64 phi1 R) (fma.f64 R phi2 (*.f64 1/2 (+.f64 (/.f64 phi1 (/.f64 (*.f64 phi2 phi2) (*.f64 R (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2))))) (/.f64 R (/.f64 phi2 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2))))))))
(fma.f64 -1 (*.f64 phi1 R) (fma.f64 R phi2 (*.f64 1/2 (+.f64 (*.f64 (/.f64 R phi2) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2))) (/.f64 phi1 (/.f64 phi2 (*.f64 (/.f64 R phi2) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2)))))))))
(*.f64 -1 (*.f64 R phi2))
(neg.f64 (*.f64 phi2 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (*.f64 phi1 R))
(fma.f64 -1 (*.f64 phi2 R) (*.f64 phi1 R))
(+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2))))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 phi1 R (*.f64 -1/2 (/.f64 R (/.f64 phi2 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))) 2)))))))
(fma.f64 -1 (*.f64 phi2 R) (fma.f64 phi1 R (*.f64 -1/2 (*.f64 (/.f64 R phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))) 2))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 phi1 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 phi2 2))) (+.f64 (*.f64 -1 (*.f64 R phi2)) (+.f64 (*.f64 phi1 R) (*.f64 -1/2 (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) phi2)))))
(fma.f64 -1/2 (/.f64 phi1 (/.f64 (*.f64 phi2 phi2) (*.f64 R (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))) 2))))) (fma.f64 -1 (*.f64 phi2 R) (fma.f64 phi1 R (*.f64 -1/2 (/.f64 R (/.f64 phi2 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))) 2))))))))
(fma.f64 -1/2 (/.f64 phi1 (/.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))) 2))) (pow.f64 (-.f64 lambda1 lambda2) 2))) (fma.f64 -1 (*.f64 phi2 R) (fma.f64 phi1 R (*.f64 -1/2 (*.f64 (/.f64 R phi2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2)))) 2)))))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1)
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 1 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 -1 (neg.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) 1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) 1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (/.f64 (*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) 1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (/.f64 1 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 1 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 1 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (/.f64 1 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 1 (*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 1 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 -1 (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) 1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(/.f64 (/.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) 1) (/.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (/.f64 (*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) 1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (/.f64 1 (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (sqrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (/.f64 (*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) 1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2))
(/.f64 (/.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (/.f64 (*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) 1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))) (+.f64 lambda2 lambda1))
(*.f64 (/.f64 (/.f64 1 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 lambda2 lambda1))
(*.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(*.f64 (/.f64 1 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2))) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 1 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (/.f64 (*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) 1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(*.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))) (+.f64 lambda2 lambda1))
(*.f64 (/.f64 (/.f64 1 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 lambda2 lambda1))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (-.f64 lambda1 lambda2))) -1)
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 1 (*.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (neg.f64 (+.f64 lambda2 lambda1)))
(*.f64 (/.f64 (/.f64 1 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 (neg.f64 lambda2) lambda1))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(neg.f64 (*.f64 (/.f64 1 (*.f64 (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 (/.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 lambda1 (neg.f64 lambda2))) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 (*.f64 1 (-.f64 lambda1 (neg.f64 lambda2))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (+.f64 (pow.f64 lambda1 3) (pow.f64 (neg.f64 lambda2) 3))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(*.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 (neg.f64 lambda2) (-.f64 (neg.f64 lambda2) lambda1))))
(*.f64 (/.f64 (*.f64 -1 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (/.f64 -1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 lambda2 lambda1)) (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))))
(/.f64 (/.f64 (-.f64 (neg.f64 lambda2) lambda1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (*.f64 -1 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))) (/.f64 (/.f64 -1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))))
(/.f64 (/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (neg.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))))
(pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1)
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)
(pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)
(pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 3)
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3) 1/3)
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(neg.f64 (/.f64 -1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(sqrt.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -2) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2)))
(sqrt.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -2) (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) 2)))
(log.f64 (exp.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (/.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3) (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3)))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(expm1.f64 (log1p.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (neg.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log1p.f64 (expm1.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 lambda2)) (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) lambda1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 lambda1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (-.f64 lambda1 lambda2) (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 -1 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (neg.f64 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 -1 (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 -1 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2))
(pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 3)
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 3)
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2)))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 lambda1 lambda2)))
(*.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (sqrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1) (neg.f64 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))) (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (sqrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))))
(*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (-.f64 lambda1 lambda2)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) 1) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (-.f64 lambda1 lambda2))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))))
(*.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) -1) (pow.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1) (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1))
(pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) -2)
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) -1) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (/.f64 1 (-.f64 lambda1 lambda2))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (neg.f64 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 1 (*.f64 -1 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (neg.f64 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 1 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 1 (neg.f64 (/.f64 -1 (-.f64 lambda1 lambda2)))) (neg.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) -1) (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 1 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) (/.f64 1 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2))) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1) (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (/.f64 -1 (-.f64 lambda1 lambda2)))) (sqrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (sqrt.f64 (/.f64 -1 (-.f64 lambda1 lambda2)))) (sqrt.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))))
(*.f64 (-.f64 lambda1 lambda2) (*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (/.f64 (+.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 3)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (-.f64 lambda2 lambda1))))
(*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (/.f64 (+.f64 (pow.f64 lambda2 3) (pow.f64 lambda1 3)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (-.f64 lambda2 lambda1))))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (-.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda2 (+.f64 lambda1 lambda2)) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (-.f64 (pow.f64 lambda1 4) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (+.f64 (pow.f64 (*.f64 lambda1 lambda1) 3) (pow.f64 (*.f64 lambda2 (+.f64 lambda1 lambda2)) 3))) (+.f64 (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)) (-.f64 (*.f64 (*.f64 lambda2 (+.f64 lambda1 lambda2)) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (+.f64 (pow.f64 lambda1 4) (*.f64 (*.f64 lambda2 (+.f64 lambda2 lambda1)) (-.f64 (*.f64 lambda2 (+.f64 lambda2 lambda1)) (*.f64 lambda1 lambda1))))) (+.f64 (pow.f64 (*.f64 lambda1 lambda1) 3) (pow.f64 (*.f64 lambda2 (+.f64 lambda2 lambda1)) 3)))
(*.f64 (/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) 1) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2))
(*.f64 (/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (cbrt.f64 (/.f64 -1 (-.f64 lambda1 lambda2)))) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 1 (*.f64 (cbrt.f64 (/.f64 -1 (-.f64 lambda1 lambda2))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2))) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) (/.f64 (cbrt.f64 (/.f64 -1 (-.f64 lambda1 lambda2))) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) 1) (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) -1) (neg.f64 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (/.f64 1 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2))) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) 1) (sqrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 -1)) (sqrt.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (sqrt.f64 -1) (pow.f64 (-.f64 lambda1 lambda2) -1/2))) (sqrt.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) 1) (cbrt.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) -1) (cbrt.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 -1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)))) (cbrt.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (cbrt.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(/.f64 1 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 1 (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 lambda1 lambda2) (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (-.f64 lambda1 lambda2) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 -1 (neg.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 -1 (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1)
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) 1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (sqrt.f64 (-.f64 lambda1 lambda2)))
(/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (neg.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 -1 (-.f64 lambda1 lambda2))) (neg.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) (cbrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) (cbrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))))
(/.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 (/.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 1 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)))
(*.f64 (/.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 1) (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2))
(/.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 3) 1)
(/.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 lambda1 lambda2)))
(/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(*.f64 (/.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (*.f64 (*.f64 (/.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1) (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cbrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 lambda1 lambda2)))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 lambda1 lambda2)))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (neg.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (/.f64 -1 (-.f64 lambda1 lambda2))) (neg.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (/.f64 1 (*.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 lambda1 lambda2))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (*.f64 (/.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 1 (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 1 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) (*.f64 (/.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (/.f64 (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)) 1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (/.f64 -1 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 1 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (sqrt.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(*.f64 (/.f64 (sqrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (sqrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 1 (-.f64 lambda1 lambda2))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (sqrt.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (sqrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(*.f64 (/.f64 (sqrt.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 -1 (-.f64 lambda1 lambda2))) (sqrt.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))))
(*.f64 (/.f64 (sqrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (sqrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (sqrt.f64 (sqrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(*.f64 (/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (sqrt.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))))
(*.f64 (/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (sqrt.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))))
(*.f64 (/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (sqrt.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (sqrt.f64 (cbrt.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (*.f64 (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(*.f64 (/.f64 (*.f64 (cbrt.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (/.f64 -1 (-.f64 lambda1 lambda2))) (cbrt.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))) (/.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))))
(*.f64 (/.f64 (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (/.f64 1 (*.f64 (-.f64 lambda1 lambda2) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (*.f64 (/.f64 (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) 1) (*.f64 (-.f64 lambda1 lambda2) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (cbrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (sqrt.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2))
(*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2)) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (pow.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) 2) (cbrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (/.f64 (+.f64 lambda2 lambda1) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1))))
(*.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (-.f64 (pow.f64 lambda1 3) (pow.f64 lambda2 3)))
(/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2)) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1) (/.f64 1 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (pow.f64 (-.f64 lambda1 lambda2) -1/2))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))))
(/.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) -1) (/.f64 -1 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (neg.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (neg.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 -1 (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) -1) (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (/.f64 (/.f64 -1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (neg.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (/.f64 -1 (-.f64 lambda1 lambda2))) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2))) (/.f64 1 (*.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (sqrt.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (*.f64 (sqrt.f64 (-.f64 lambda1 lambda2)) (sqrt.f64 (-.f64 lambda1 lambda2))))
(/.f64 (+.f64 (sqrt.f64 lambda2) (sqrt.f64 lambda1)) (/.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 (sqrt.f64 lambda1) (sqrt.f64 lambda2))))
(*.f64 (/.f64 (+.f64 (sqrt.f64 lambda2) (sqrt.f64 lambda1)) (/.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (-.f64 (sqrt.f64 lambda1) (sqrt.f64 lambda2)))
(*.f64 (*.f64 (/.f64 (+.f64 (sqrt.f64 lambda2) (sqrt.f64 lambda1)) 1) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 (sqrt.f64 lambda1) (sqrt.f64 lambda2)))
(/.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1/4) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1/4)))
(*.f64 (/.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) -1/4) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) -1/4))
(*.f64 (*.f64 (/.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) -1/4) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) -1/4))
(/.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cbrt.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cbrt.f64 (-.f64 lambda1 lambda2)) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))))
(/.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 1) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (-.f64 lambda1 lambda2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2)))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2)))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) 1) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 lambda1 lambda2)))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (/.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (-.f64 lambda1 lambda2) -1/2)))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))) (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (*.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cbrt.f64 (pow.f64 (-.f64 lambda1 lambda2) -2))))
(/.f64 (pow.f64 1 -1/2) (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) -1/2) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1/2)))
(*.f64 (/.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) -1/2) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (pow.f64 (/.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) -1/2))
(*.f64 (*.f64 (/.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) -1/2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (pow.f64 (/.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) -1/2))
(/.f64 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1/2) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1/2)))
(*.f64 (/.f64 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) -1/2) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) -1/2))
(/.f64 (*.f64 (/.f64 1 (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (pow.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) -1/2) (/.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1/2)))
(*.f64 (/.f64 (pow.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2) -1/2) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) -1/2))
(*.f64 (*.f64 (/.f64 (pow.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2) -1/2) (pow.f64 (-.f64 lambda1 lambda2) -1/2)) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) -1/2))
(/.f64 (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) -1) (/.f64 1 (pow.f64 (/.f64 1 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1) (/.f64 1 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1)))
(/.f64 (/.f64 1 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (/.f64 1 (/.f64 1 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(/.f64 (pow.f64 (/.f64 (pow.f64 (-.f64 lambda1 lambda2) -1/2) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) -2) 1)
(/.f64 (pow.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 2) -1) (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) -1)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2))
(sqrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(log.f64 (exp.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (-.f64 lambda1 lambda2) 3)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 3) (pow.f64 (/.f64 1 (-.f64 lambda1 lambda2)) 3)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(expm1.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (+.f64 (log.f64 (-.f64 lambda1 lambda2)) (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (-.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (neg.f64 (log.f64 (-.f64 lambda1 lambda2)))))
(exp.f64 (-.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (neg.f64 (log.f64 (-.f64 lambda1 lambda2)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log1p.f64 (expm1.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))))) 1)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))
(pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))) 1)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))
(pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))) 2)
(pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))) 2)
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))) 3)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))) 3) 1/3)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))) 2))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2))) 2))
(log.f64 (pow.f64 (exp.f64 R) (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))))
(*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)) (log.f64 (exp.f64 R)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2))) 3))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)) 3)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))
(cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)) 3) (pow.f64 R 3)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))
(expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))
(exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))) 1))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))
(log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 phi1 phi2)))

localize7.0ms (0%)

Local Accuracy

Found 1 expressions with local accuracy:

NewAccuracyProgram
100.0%
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
Compiler

Compiled 20 to 8 computations (60% saved)

series2.0ms (0%)

Counts
1 → 36
Calls

9 calls:

TimeVariablePointExpression
0.0ms
R
@0
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
0.0ms
phi1
@inf
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
0.0ms
phi2
@-inf
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
0.0ms
R
@inf
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
0.0ms
phi2
@inf
(*.f64 R (+.f64 (neg.f64 phi1) phi2))

rewrite69.0ms (0.2%)

Algorithm
batch-egg-rewrite
Rules
1974×add-sqr-sqrt
1958×*-un-lft-identity
1828×add-cube-cbrt
1798×add-cbrt-cube
204×pow1
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0917
119513
2273613
Stop Event
node limit
Counts
1 → 24
Calls
Call 1
Inputs
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
Outputs
(((+.f64 (*.f64 R phi1) (*.f64 R phi2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((+.f64 (*.f64 R phi2) (*.f64 R phi1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((+.f64 (*.f64 (*.f64 R phi1) 1) (*.f64 (*.f64 R phi2) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (+.f64 phi1 phi2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((/.f64 (*.f64 R (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (-.f64 phi1 phi2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((/.f64 (*.f64 R (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3))) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((/.f64 (*.f64 (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3)) R) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((/.f64 (+.f64 (pow.f64 (*.f64 R phi1) 3) (pow.f64 (*.f64 R phi2) 3)) (+.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (-.f64 (*.f64 (*.f64 R phi2) (*.f64 R phi2)) (*.f64 (*.f64 R phi1) (*.f64 R phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((pow.f64 (*.f64 R (+.f64 phi1 phi2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((pow.f64 (sqrt.f64 (*.f64 R (+.f64 phi1 phi2))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((pow.f64 (cbrt.f64 (*.f64 R (+.f64 phi1 phi2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((pow.f64 (pow.f64 (*.f64 R (+.f64 phi1 phi2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((sqrt.f64 (pow.f64 (*.f64 R (+.f64 phi1 phi2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((log.f64 (pow.f64 (exp.f64 R) (+.f64 phi1 phi2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 R (+.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((cbrt.f64 (pow.f64 (*.f64 R (+.f64 phi1 phi2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((expm1.f64 (log1p.f64 (*.f64 R (+.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((exp.f64 (log.f64 (*.f64 R (+.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 R (+.f64 phi1 phi2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((log1p.f64 (expm1.f64 (*.f64 R (+.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((fma.f64 R phi1 (*.f64 R phi2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)) ((fma.f64 phi1 R (*.f64 R phi2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 R (+.f64 (neg.f64 phi1) phi2))) #f)))

simplify60.0ms (0.2%)

Algorithm
egg-herbie
Rules
1536×associate-/r*
802×associate-*r/
718×associate-+r+
608×associate-+l+
578×associate-*l/
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
083906
1241900
2945898
33594892
Stop Event
node limit
Counts
60 → 39
Calls
Call 1
Inputs
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R phi2)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(*.f64 -1 (*.f64 phi1 R))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(*.f64 -1 (*.f64 phi1 R))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(*.f64 -1 (*.f64 phi1 R))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(*.f64 R phi2)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(*.f64 R phi2)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(+.f64 (*.f64 R phi1) (*.f64 R phi2))
(+.f64 (*.f64 R phi2) (*.f64 R phi1))
(+.f64 (*.f64 (*.f64 R phi1) 1) (*.f64 (*.f64 R phi2) 1))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (+.f64 phi1 phi2)))) 1)
(/.f64 (*.f64 R (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (-.f64 phi1 phi2))
(/.f64 (*.f64 R (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3))) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2))
(/.f64 (*.f64 (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3)) R) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))))
(/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
(/.f64 (+.f64 (pow.f64 (*.f64 R phi1) 3) (pow.f64 (*.f64 R phi2) 3)) (+.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (-.f64 (*.f64 (*.f64 R phi2) (*.f64 R phi2)) (*.f64 (*.f64 R phi1) (*.f64 R phi2)))))
(pow.f64 (*.f64 R (+.f64 phi1 phi2)) 1)
(pow.f64 (sqrt.f64 (*.f64 R (+.f64 phi1 phi2))) 2)
(pow.f64 (cbrt.f64 (*.f64 R (+.f64 phi1 phi2))) 3)
(pow.f64 (pow.f64 (*.f64 R (+.f64 phi1 phi2)) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 R (+.f64 phi1 phi2)) 2))
(log.f64 (pow.f64 (exp.f64 R) (+.f64 phi1 phi2)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (+.f64 phi1 phi2)))))
(cbrt.f64 (pow.f64 (*.f64 R (+.f64 phi1 phi2)) 3))
(expm1.f64 (log1p.f64 (*.f64 R (+.f64 phi1 phi2))))
(exp.f64 (log.f64 (*.f64 R (+.f64 phi1 phi2))))
(exp.f64 (*.f64 (log.f64 (*.f64 R (+.f64 phi1 phi2))) 1))
(log1p.f64 (expm1.f64 (*.f64 R (+.f64 phi1 phi2))))
(fma.f64 R phi1 (*.f64 R phi2))
(fma.f64 phi1 R (*.f64 R phi2))
Outputs
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R phi2)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 -1 (*.f64 phi1 R))
(neg.f64 (*.f64 R phi1))
(*.f64 R (neg.f64 phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 -1 (*.f64 phi1 R))
(neg.f64 (*.f64 R phi1))
(*.f64 R (neg.f64 phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 -1 (*.f64 phi1 R))
(neg.f64 (*.f64 R phi1))
(*.f64 R (neg.f64 phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R phi2)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R phi2)
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 -1 (*.f64 phi1 R)) (*.f64 R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+.f64 (*.f64 R phi1) (*.f64 R phi2))
(*.f64 R (+.f64 phi2 phi1))
(+.f64 (*.f64 R phi2) (*.f64 R phi1))
(*.f64 R (+.f64 phi2 phi1))
(+.f64 (*.f64 (*.f64 R phi1) 1) (*.f64 (*.f64 R phi2) 1))
(*.f64 R (+.f64 phi2 phi1))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (+.f64 phi1 phi2)))) 1)
(*.f64 R (+.f64 phi2 phi1))
(/.f64 (*.f64 R (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (-.f64 phi1 phi2))
(*.f64 R (+.f64 phi2 phi1))
(/.f64 (*.f64 R (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3))) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))))
(/.f64 (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3)) (/.f64 (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi2 phi1))) R))
(*.f64 (/.f64 R (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3)))
(*.f64 R (/.f64 (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2))
(*.f64 R (+.f64 phi2 phi1))
(/.f64 (*.f64 (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3)) R) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))))
(/.f64 (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3)) (/.f64 (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi2 phi1))) R))
(*.f64 (/.f64 R (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3)))
(*.f64 R (/.f64 (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
(*.f64 R (+.f64 phi2 phi1))
(/.f64 (+.f64 (pow.f64 (*.f64 R phi1) 3) (pow.f64 (*.f64 R phi2) 3)) (+.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (-.f64 (*.f64 (*.f64 R phi2) (*.f64 R phi2)) (*.f64 (*.f64 R phi1) (*.f64 R phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 R phi1) 3) (pow.f64 (*.f64 R phi2) 3)) (fma.f64 (*.f64 R phi1) (*.f64 R phi1) (*.f64 (*.f64 R phi2) (-.f64 (*.f64 R phi2) (*.f64 R phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 R phi1) 3) (pow.f64 (*.f64 R phi2) 3)) (fma.f64 (*.f64 R phi2) (*.f64 R (-.f64 phi2 phi1)) (*.f64 R (*.f64 (*.f64 phi1 phi1) R))))
(/.f64 (*.f64 (+.f64 (pow.f64 phi1 3) (pow.f64 phi2 3)) (pow.f64 R 3)) (*.f64 R (+.f64 (*.f64 R (*.f64 phi1 phi1)) (*.f64 (*.f64 R phi2) (-.f64 phi2 phi1)))))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 R phi1) 3) (pow.f64 (*.f64 R phi2) 3)) R) (*.f64 R (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(pow.f64 (*.f64 R (+.f64 phi1 phi2)) 1)
(*.f64 R (+.f64 phi2 phi1))
(pow.f64 (sqrt.f64 (*.f64 R (+.f64 phi1 phi2))) 2)
(*.f64 R (+.f64 phi2 phi1))
(pow.f64 (cbrt.f64 (*.f64 R (+.f64 phi1 phi2))) 3)
(*.f64 R (+.f64 phi2 phi1))
(pow.f64 (pow.f64 (*.f64 R (+.f64 phi1 phi2)) 3) 1/3)
(*.f64 R (+.f64 phi2 phi1))
(sqrt.f64 (pow.f64 (*.f64 R (+.f64 phi1 phi2)) 2))
(*.f64 R (+.f64 phi2 phi1))
(log.f64 (pow.f64 (exp.f64 R) (+.f64 phi1 phi2)))
(*.f64 R (+.f64 phi2 phi1))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (+.f64 phi1 phi2)))))
(*.f64 R (+.f64 phi2 phi1))
(cbrt.f64 (pow.f64 (*.f64 R (+.f64 phi1 phi2)) 3))
(*.f64 R (+.f64 phi2 phi1))
(expm1.f64 (log1p.f64 (*.f64 R (+.f64 phi1 phi2))))
(*.f64 R (+.f64 phi2 phi1))
(exp.f64 (log.f64 (*.f64 R (+.f64 phi1 phi2))))
(*.f64 R (+.f64 phi2 phi1))
(exp.f64 (*.f64 (log.f64 (*.f64 R (+.f64 phi1 phi2))) 1))
(*.f64 R (+.f64 phi2 phi1))
(log1p.f64 (expm1.f64 (*.f64 R (+.f64 phi1 phi2))))
(*.f64 R (+.f64 phi2 phi1))
(fma.f64 R phi1 (*.f64 R phi2))
(*.f64 R (+.f64 phi2 phi1))
(fma.f64 phi1 R (*.f64 R phi2))
(*.f64 R (+.f64 phi2 phi1))

localize19.0ms (0.1%)

Local Accuracy

Found 3 expressions with local accuracy:

NewAccuracyProgram
99.8%
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
99.7%
(*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
94.9%
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
Compiler

Compiled 42 to 21 computations (50% saved)

localize41.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
99.3%
(+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
99.3%
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
99.1%
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
94.9%
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
Compiler

Compiled 68 to 39 computations (42.6% saved)

series61.0ms (0.2%)

Counts
3 → 72
Calls

18 calls:

TimeVariablePointExpression
15.0ms
phi2
@-inf
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
15.0ms
phi1
@-inf
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
13.0ms
phi1
@inf
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
13.0ms
phi2
@inf
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
1.0ms
phi2
@0
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))

rewrite151.0ms (0.5%)

Algorithm
batch-egg-rewrite
Rules
1088×*-commutative
888×associate-*r/
762×distribute-lft-in
740×distribute-rgt-in
692×associate-*l/
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01359
127059
2320759
Stop Event
node limit
Counts
3 → 148
Calls
Call 1
Inputs
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
Outputs
(((+.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 0 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 (+.f64 0 (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))) (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 (+.f64 0 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 (*.f64 1 (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))) (*.f64 1 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 (*.f64 1 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (*.f64 1 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 (*.f64 (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) 1) (*.f64 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 (*.f64 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1) (*.f64 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (log.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (log.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (log.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (log.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (+.f64 0 (log.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (log.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (+.f64 0 (log.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (log.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (+.f64 0 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (+.f64 0 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 2 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((cbrt.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((exp.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)))
(((+.f64 1 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 1 (+.f64 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) 0)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 1 (*.f64 1 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 1 (*.f64 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 0 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((+.f64 -1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 (/.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (+.f64 (/.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (pow.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (+.f64 1 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (-.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1) (+.f64 1 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1) (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 1 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1)) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 1 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1)) (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) 1) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1) 1) (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((sqrt.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log.f64 (exp.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((cbrt.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((exp.f64 (log.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log1p.f64 (expm1.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((fma.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((fma.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((fma.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)))
(((-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (/.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((-.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (+.f64 (/.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 0)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (/.f64 1 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (/.f64 1 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (-.f64 1 (*.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (-.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((*.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (+.f64 1 (pow.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3))) (+.f64 1 (-.f64 (*.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 1 (/.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (/.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (/.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (/.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (-.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (*.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (-.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (*.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (+.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 3)) (*.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 (+.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (-.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3)) (*.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (+.f64 1 (+.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (neg.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (neg.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (neg.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (neg.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1)) (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 1 (neg.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (neg.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 1 (neg.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (neg.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) 1) (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (neg.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 1) (neg.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (neg.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) 1) (neg.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (-.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (-.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3)) (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (+.f64 1 (+.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (-.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (/.f64 1 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (*.f64 (+.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 3)) (/.f64 1 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (-.f64 (+.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 1) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((/.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (*.f64 (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))) (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (E.f64) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((pow.f64 (exp.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((sqrt.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log.f64 (exp.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((cbrt.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((expm1.f64 (log1p.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((log1p.f64 (expm1.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((fma.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((fma.f64 (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)) ((fma.f64 (pow.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) #f)))

simplify150.0ms (0.5%)

Algorithm
egg-herbie
Rules
1566×associate-/r*
972×+-commutative
704×associate--r+
668×associate-*r/
506×fma-def
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
044912116
1116311626
2470411620
Stop Event
node limit
Counts
220 → 288
Calls
Call 1
Inputs
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (pow.f64 phi2 2))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))
(+.f64 (*.f64 1/6 (*.f64 (pow.f64 phi2 3) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3)) (+.f64 (*.f64 6 (+.f64 (*.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3)) (+.f64 (*.f64 1/48 (sin.f64 (*.f64 1/2 phi1))) (*.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))))) (*.f64 3 (*.f64 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (sin.f64 (*.f64 1/2 phi1)))))))) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (pow.f64 phi2 2))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))) (*.f64 1/2 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 2 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2))))))))))
(+.f64 (*.f64 1/6 (*.f64 (+.f64 (*.f64 3 (*.f64 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 6 (+.f64 (*.f64 1/16 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3)) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2)))))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3)))) (pow.f64 phi1 3))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))) (*.f64 1/2 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 2 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))))))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi1))) 1)
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) 1)
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (pow.f64 phi2 2) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) 1)
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (pow.f64 phi2 2) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3)) (+.f64 (*.f64 1/48 (sin.f64 (*.f64 1/2 phi1))) (*.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))))) (*.f64 (pow.f64 phi2 3) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) 1)
(-.f64 (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))))) 1)
(-.f64 (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))))))) 1)
(-.f64 (+.f64 (*.f64 (pow.f64 phi1 3) (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 1/16 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3)) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2))))))) (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))))))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))) 1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))) 1)
(exp.f64 (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (pow.f64 phi2 2) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (pow.f64 phi2 2) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3)) (+.f64 (*.f64 1/48 (sin.f64 (*.f64 1/2 phi1))) (*.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))))) (*.f64 (pow.f64 phi2 3) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(exp.f64 (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))))))
(+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))))))
(+.f64 (*.f64 (pow.f64 phi1 3) (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 1/16 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3)) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2))))))) (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))))))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)
(+.f64 0 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(+.f64 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(+.f64 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)))
(+.f64 (+.f64 0 (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))) (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(+.f64 (+.f64 0 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(+.f64 (*.f64 1 (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))) (*.f64 1 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(+.f64 (*.f64 1 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (*.f64 1 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(+.f64 (*.f64 (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) 1) (*.f64 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1) (*.f64 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1))
(-.f64 (log.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (log.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(-.f64 (log.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (log.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1)
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))
(-.f64 (+.f64 0 (log.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (log.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(-.f64 (+.f64 0 (log.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (log.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(-.f64 (+.f64 0 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1)
(-.f64 (+.f64 0 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))
(*.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 2 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)
(pow.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) 1/3)
(sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(exp.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 1 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1))
(+.f64 1 (+.f64 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) 0))
(+.f64 1 (*.f64 1 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)))
(+.f64 1 (*.f64 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) 1))
(+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 0)
(+.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)
(+.f64 0 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) 1)
(+.f64 -1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(-.f64 (exp.f64 (log1p.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 2)
(-.f64 (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)
(-.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 (/.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) -1))
(-.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (+.f64 (/.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1))
(*.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(*.f64 (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (pow.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))
(*.f64 (pow.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 (+.f64 1 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1))
(*.f64 (-.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1) (+.f64 1 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1) (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (*.f64 1 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1)) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (*.f64 1 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1)) (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) 1) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1) 1) (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(pow.f64 (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)
(pow.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3)
(pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1/3)
(sqrt.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(log.f64 (exp.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(log.f64 (+.f64 1 (expm1.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(cbrt.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))
(exp.f64 (log.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(log1p.f64 (expm1.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(fma.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)
(fma.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) -1)
(fma.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) -1)
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 0)
(-.f64 (exp.f64 (log1p.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1)
(-.f64 (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1)
(-.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (/.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(-.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (+.f64 (/.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 0))
(*.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(*.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))
(*.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (/.f64 1 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(*.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(*.f64 (/.f64 1 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))
(*.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (-.f64 1 (*.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (-.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (+.f64 1 (pow.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3))) (+.f64 1 (-.f64 (*.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 1 (/.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))
(/.f64 (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (/.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))))
(/.f64 (*.f64 (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (/.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (/.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))))
(/.f64 (-.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (*.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))))
(/.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1))
(/.f64 (-.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (*.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(/.f64 (+.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 3)) (*.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 (+.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))))
(/.f64 (-.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3)) (*.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (+.f64 1 (+.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))))
(/.f64 (neg.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (neg.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (neg.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (neg.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1)) (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1))
(/.f64 (*.f64 1 (neg.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (neg.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (*.f64 1 (neg.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (neg.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (*.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) 1) (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1))
(/.f64 (*.f64 (neg.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 1) (neg.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (*.f64 (neg.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) 1) (neg.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (-.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(/.f64 (*.f64 (-.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3)) (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (+.f64 1 (+.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))
(/.f64 (*.f64 (-.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (/.f64 1 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 3)) (/.f64 1 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (-.f64 (+.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))
(/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 1) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (*.f64 (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))) (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(pow.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)
(pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3)
(pow.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1/3)
(pow.f64 (E.f64) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(pow.f64 (exp.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(sqrt.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(log.f64 (exp.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(log.f64 (+.f64 1 (expm1.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(cbrt.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))
(expm1.f64 (log1p.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(log1p.f64 (expm1.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(fma.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(fma.f64 (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1)
(fma.f64 (pow.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1)
Outputs
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 -1/2 phi2) (sin.f64 (*.f64 1/2 phi1))))
(fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (pow.f64 phi2 2))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))
(fma.f64 1/2 (*.f64 (fma.f64 2 (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) -1/4)) (*.f64 phi2 phi2)) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 -1/2 phi2) (sin.f64 (*.f64 1/2 phi1)))))
(fma.f64 1/2 (*.f64 phi2 (*.f64 phi2 (fma.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) -1/4 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) 1/4) (*.f64 (cos.f64 (*.f64 1/2 phi1)) -1/4))))) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 1/6 (*.f64 (pow.f64 phi2 3) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3)) (+.f64 (*.f64 6 (+.f64 (*.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3)) (+.f64 (*.f64 1/48 (sin.f64 (*.f64 1/2 phi1))) (*.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))))) (*.f64 3 (*.f64 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (sin.f64 (*.f64 1/2 phi1)))))))) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (pow.f64 phi2 2))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))
(fma.f64 1/6 (*.f64 (pow.f64 phi2 3) (fma.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (fma.f64 6 (fma.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (fma.f64 1/48 (sin.f64 (*.f64 1/2 phi1)) (*.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))))) (*.f64 3 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (fma.f64 1/2 (*.f64 (fma.f64 2 (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) -1/4)) (*.f64 phi2 phi2)) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 -1/2 phi2) (sin.f64 (*.f64 1/2 phi1))))))
(fma.f64 1/6 (*.f64 (pow.f64 phi2 3) (fma.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (fma.f64 6 (fma.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) -1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 1/48 (*.f64 (cos.f64 (*.f64 1/2 phi1)) 1/16)))) (*.f64 (fma.f64 (cos.f64 (*.f64 1/2 phi1)) -1/8 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) 3))))) (fma.f64 1/2 (*.f64 phi2 (*.f64 phi2 (fma.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) -1/4 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) 1/4) (*.f64 (cos.f64 (*.f64 1/2 phi1)) -1/4))))) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))))
(fma.f64 (*.f64 1/6 (pow.f64 phi2 3)) (fma.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (fma.f64 6 (fma.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) -1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 1/48 (*.f64 (cos.f64 (*.f64 1/2 phi1)) 1/16)))) (*.f64 (fma.f64 (cos.f64 (*.f64 1/2 phi1)) -1/8 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) 3)))) (fma.f64 1/2 (*.f64 phi2 (*.f64 phi2 (fma.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) -1/4 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) 1/4) (*.f64 (cos.f64 (*.f64 1/2 phi1)) -1/4))))) (fma.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (cos.f64 (*.f64 1/2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))
(fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))) (*.f64 1/2 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 2 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2))))))))))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (*.f64 1/2 (*.f64 phi1 phi1)) (fma.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 2 (fma.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))))))))
(+.f64 (fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (fma.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) 1/4) (*.f64 -1/4 (cos.f64 (*.f64 1/2 phi2))))) 1/2)))
(+.f64 (*.f64 1/6 (*.f64 (+.f64 (*.f64 3 (*.f64 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 6 (+.f64 (*.f64 1/16 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3)) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2)))))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3)))) (pow.f64 phi1 3))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))) (*.f64 1/2 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 2 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))))))))))
(fma.f64 1/6 (*.f64 (fma.f64 3 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (fma.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2))))) (fma.f64 6 (fma.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))) (fma.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2))))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3)))) (pow.f64 phi1 3)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (*.f64 1/2 (*.f64 phi1 phi1)) (fma.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 2 (fma.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2))))))))))
(fma.f64 1/6 (*.f64 (fma.f64 3 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) (fma.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (*.f64 6 (fma.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))) (fma.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2)))))))) (pow.f64 phi1 3)) (+.f64 (fma.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (cos.f64 (*.f64 1/2 phi2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (fma.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) 1/4) (*.f64 -1/4 (cos.f64 (*.f64 1/2 phi2))))) 1/2))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi1))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 phi1)))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) 1)
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (expm1.f64 (cos.f64 (*.f64 1/2 phi1))))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (expm1.f64 (cos.f64 (*.f64 1/2 phi1))))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (pow.f64 phi2 2) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) 1)
(+.f64 (fma.f64 -1/2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (*.f64 phi2 phi2) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) -1)
(+.f64 -1 (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 1/2 phi1)) -1/8 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 phi2 phi2)) 1) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))))
(+.f64 -1 (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 1 (*.f64 (fma.f64 (cos.f64 (*.f64 1/2 phi1)) -1/8 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 phi2 phi2))) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (pow.f64 phi2 2) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3)) (+.f64 (*.f64 1/48 (sin.f64 (*.f64 1/2 phi1))) (*.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))))) (*.f64 (pow.f64 phi2 3) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) 1)
(+.f64 (fma.f64 -1/2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (*.f64 phi2 phi2) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 (fma.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (fma.f64 1/48 (sin.f64 (*.f64 1/2 phi1)) (*.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))))) (*.f64 (pow.f64 phi2 3) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) -1)
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi1))) (+.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 1/2 phi1)) -1/8 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 phi2 phi2)) (*.f64 (pow.f64 phi2 3) (fma.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) -1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 1/48 (*.f64 (cos.f64 (*.f64 1/2 phi1)) 1/16))))))) (expm1.f64 (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi1))) (+.f64 (*.f64 (pow.f64 phi2 3) (fma.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) -1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 1/48 (*.f64 (cos.f64 (*.f64 1/2 phi1)) 1/16))))) (*.f64 (fma.f64 (cos.f64 (*.f64 1/2 phi1)) -1/8 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 phi2 phi2)))) (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (expm1.f64 (cos.f64 (*.f64 1/2 phi1)))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 phi2)))
(-.f64 (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))))) 1)
(+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (-.f64 (*.f64 (*.f64 -1/2 phi1) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) 1))
(+.f64 (*.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) -1/2)) (expm1.f64 (cos.f64 (*.f64 1/2 phi2))))
(+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 phi2))) (*.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) -1/2)))
(-.f64 (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))))))) 1)
(+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (-.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 (fma.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (*.f64 (*.f64 -1/2 phi1) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))))) 1))
(+.f64 (*.f64 (+.f64 (*.f64 (*.f64 phi1 phi1) (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) 1) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) -1))
(+.f64 (*.f64 (+.f64 1 (*.f64 (*.f64 phi1 phi1) (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) -1))
(-.f64 (+.f64 (*.f64 (pow.f64 phi1 3) (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 1/16 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3)) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2))))))) (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))))))) 1)
(+.f64 (fma.f64 (pow.f64 phi1 3) (*.f64 (fma.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))) (fma.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2))))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (fma.f64 (*.f64 phi1 phi1) (*.f64 (fma.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (*.f64 (*.f64 -1/2 phi1) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))))))) -1)
(fma.f64 (pow.f64 phi1 3) (*.f64 (fma.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))) (fma.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2))))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 phi1 phi1) (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) 1) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) -1)))
(fma.f64 (pow.f64 phi1 3) (*.f64 (fma.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))) (fma.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2))))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 (+.f64 1 (*.f64 (*.f64 phi1 phi1) (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) -1)))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 phi1)))
(+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))
(fma.f64 -1/2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))
(+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (pow.f64 phi2 2) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))
(fma.f64 -1/2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (*.f64 phi2 phi2) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 1/2 phi1)) -1/8 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 phi2 phi2)) 1) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))
(fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 1 (*.f64 (fma.f64 (cos.f64 (*.f64 1/2 phi1)) -1/8 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 phi2 phi2))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 -1/2 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi1))) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (pow.f64 phi2 2) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3)) (+.f64 (*.f64 1/48 (sin.f64 (*.f64 1/2 phi1))) (*.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))))) (*.f64 (pow.f64 phi2 3) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))))
(fma.f64 -1/2 (*.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 (*.f64 phi2 phi2) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) (fma.f64 (fma.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) (fma.f64 1/48 (sin.f64 (*.f64 1/2 phi1)) (*.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))))) (*.f64 (pow.f64 phi2 3) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) (exp.f64 (cos.f64 (*.f64 1/2 phi1))))))
(+.f64 (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi1))) (+.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 1/2 phi1)) -1/8 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 phi2 phi2)) (*.f64 (pow.f64 phi2 3) (fma.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) -1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 1/48 (*.f64 (cos.f64 (*.f64 1/2 phi1)) 1/16))))))) (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (fma.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (exp.f64 (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi1))) (+.f64 (*.f64 (pow.f64 phi2 3) (fma.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 3) -1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 1/48 (*.f64 (cos.f64 (*.f64 1/2 phi1)) 1/16))))) (*.f64 (fma.f64 (cos.f64 (*.f64 1/2 phi1)) -1/8 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (*.f64 phi2 phi2)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 phi2)))
(+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))))))
(+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (*.f64 (*.f64 -1/2 phi1) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))))
(fma.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))
(+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))))))
(+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (fma.f64 (*.f64 phi1 phi1) (*.f64 (fma.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (*.f64 (*.f64 -1/2 phi1) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))))))
(+.f64 (*.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) -1/2)) (*.f64 (+.f64 (*.f64 (*.f64 phi1 phi1) (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) 1) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) -1/2)) (*.f64 (+.f64 1 (*.f64 (*.f64 phi1 phi1) (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 (pow.f64 phi1 3) (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 1/16 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3)) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2))))))) (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 (+.f64 (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))) (*.f64 -1/2 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))))))))
(fma.f64 (pow.f64 phi1 3) (*.f64 (fma.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))) (fma.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2))))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) (fma.f64 (*.f64 phi1 phi1) (*.f64 (fma.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (*.f64 (*.f64 -1/2 phi1) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))))))
(fma.f64 (pow.f64 phi1 3) (*.f64 (fma.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))) (fma.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2))))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) -1/2)) (*.f64 (+.f64 (*.f64 (*.f64 phi1 phi1) (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2)))) 1) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))))
(fma.f64 (pow.f64 phi1 3) (*.f64 (fma.f64 1/16 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi2))) (fma.f64 -1/48 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 3) (*.f64 1/48 (sin.f64 (*.f64 1/2 phi2))))) (exp.f64 (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))) (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 phi2))) -1/2)) (*.f64 (+.f64 1 (*.f64 (*.f64 phi1 phi1) (fma.f64 -1/8 (cos.f64 (*.f64 1/2 phi2)) (*.f64 1/8 (pow.f64 (sin.f64 (*.f64 1/2 phi2)) 2))))) (exp.f64 (cos.f64 (*.f64 1/2 phi2))))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 0 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(+.f64 (*.f64 2 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 3 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 2 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)))
(+.f64 (*.f64 2 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 3 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (+.f64 0 (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))) (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(+.f64 (*.f64 2 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 3 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (+.f64 0 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 2 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 1 (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))) (*.f64 1 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(+.f64 (*.f64 2 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 3 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 1 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (*.f64 1 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(*.f64 2 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 (log.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) 1) (*.f64 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1))
(+.f64 (*.f64 2 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 3 (log.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1) (*.f64 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1))
(*.f64 2 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(-.f64 (log.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (log.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(-.f64 (log.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (log.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(-.f64 (log1p.f64 (neg.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (log1p.f64 (neg.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(-.f64 (log.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (log.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(-.f64 (log1p.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (log1p.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(-.f64 (log1p.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (log1p.f64 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi2))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi2))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (sin.f64 (*.f64 1/2 phi2)))))
(-.f64 (+.f64 0 (log.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (log.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(-.f64 (log.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (log.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(-.f64 (log1p.f64 (neg.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (log1p.f64 (neg.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(-.f64 (+.f64 0 (log.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (log.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(-.f64 (log1p.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (log1p.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(-.f64 (log1p.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (log1p.f64 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(-.f64 (+.f64 0 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (+.f64 0 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi2))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi2))))
(fma.f64 (cos.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (sin.f64 (*.f64 1/2 phi2)))))
(*.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 2 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 2 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(pow.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) 1/3)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1)))))
(sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi1 phi2)))))
(sqrt.f64 (fma.f64 1/2 (cos.f64 (+.f64 phi1 phi2)) 1/2))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(exp.f64 (log.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 1 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 1 (+.f64 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) 0))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 1 (*.f64 1 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 1 (*.f64 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) 1))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 0)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 0 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(+.f64 -1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (log1p.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 2)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 (/.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) -1))
(+.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) -1)
(+.f64 -1 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(-.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (+.f64 (/.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1))
(+.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) -1)
(+.f64 -1 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(*.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (pow.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (pow.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (+.f64 1 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (-.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1) (+.f64 1 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) -1) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (+.f64 2 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1) (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3) -1) (+.f64 (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(/.f64 (*.f64 1 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1)) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) -1) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (+.f64 2 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (*.f64 1 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1)) (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3) -1) (+.f64 (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) 1) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) -1) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (+.f64 2 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1) 1) (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3) -1) (+.f64 (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1/3)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(sqrt.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(sqrt.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(fabs.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log.f64 (exp.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (+.f64 1 (expm1.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (log.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log1p.f64 (expm1.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(fma.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(fma.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) -1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(fma.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) -1)
(expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 0)
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (exp.f64 (log1p.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 1)
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (+.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1)
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(-.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (/.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(-.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (+.f64 (/.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) 0))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (/.f64 1 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (/.f64 1 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(*.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (*.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (+.f64 1 (*.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)))
(*.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))) (fma.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 1))
(*.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (-.f64 1 (*.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (-.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (-.f64 1 (*.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (-.f64 1 (*.f64 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))) (-.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (-.f64 1 (*.f64 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))) (-.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(*.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (+.f64 1 (pow.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3))) (+.f64 1 (-.f64 (*.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (-.f64 (*.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))) (+.f64 1 (pow.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 3)))
(*.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (pow.f64 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) 3))) (+.f64 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (pow.f64 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) 3))) (+.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))))
(/.f64 1 (/.f64 1 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(/.f64 (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(*.f64 (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (/.f64 (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (/.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))))
(*.f64 (/.f64 (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))))
(*.f64 (hypot.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3/2)) (/.f64 (hypot.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3/2)) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))))
(/.f64 (*.f64 (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (/.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))
(/.f64 (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (/.f64 (/.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))))
(/.f64 (*.f64 (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))) (/.f64 (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (/.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))))
(*.f64 (/.f64 (*.f64 (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)))) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))))
(*.f64 (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))) (/.f64 (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))) (/.f64 (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))))))
(/.f64 (-.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (*.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 6)) (*.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 6)) (*.f64 (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))))
(/.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (*.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))
(/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(/.f64 (+.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 3)) (*.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (-.f64 (+.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))))
(/.f64 (/.f64 (+.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3) 3)) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 6) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))))
(/.f64 (+.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3) 3)) (*.f64 (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 6) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)))))
(/.f64 (-.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3)) (*.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (+.f64 1 (+.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))))
(/.f64 (-.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) 3)) (*.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (+.f64 1 (+.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4)))))
(/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 6)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4))))
(/.f64 (neg.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (neg.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (neg.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(/.f64 (*.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1)) (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (*.f64 1 (neg.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (neg.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (*.f64 1 (neg.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (neg.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(/.f64 (*.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (sqrt.f64 (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(/.f64 (*.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)))))
(*.f64 (/.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))) (hypot.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3/2)))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2) (/.f64 (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2) (cbrt.f64 (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))) (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2) (/.f64 (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2) (cbrt.f64 (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))))
(/.f64 (*.f64 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 1) 1) (+.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (*.f64 (neg.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) 1) (neg.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (*.f64 (neg.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) 1) (neg.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (sqrt.f64 (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (sqrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (/.f64 (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (sqrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)))))
(*.f64 (/.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))) (hypot.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3/2)))
(/.f64 (*.f64 (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2) (/.f64 (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2) (cbrt.f64 (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cbrt.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)) (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2) (/.f64 (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) 2) (cbrt.f64 (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))) (cbrt.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))))
(/.f64 (*.f64 (-.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))) (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)))
(/.f64 (*.f64 (-.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) 3)) (/.f64 1 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (+.f64 1 (+.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))
(/.f64 (-.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) 3)) (*.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))) (+.f64 1 (+.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4)))))
(/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 6)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (+.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 4))))
(/.f64 (*.f64 (-.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (/.f64 1 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 6)) (*.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 6)) (*.f64 (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 3)) (/.f64 1 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (-.f64 (+.f64 1 (*.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)))
(/.f64 (/.f64 (+.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3) 3)) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 6) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3))))
(/.f64 (+.f64 1 (pow.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3) 3)) (*.f64 (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 6) (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)))))
(/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) 1) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (sqrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (*.f64 (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))) (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (cbrt.f64 (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2)) (-.f64 2 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))
(/.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(/.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (sqrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(/.f64 (/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3)) (*.f64 (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))) (cbrt.f64 (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2) (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 1 (pow.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 3)) (+.f64 1 (*.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 -1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (cbrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3)
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) 1/3)
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (E.f64) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) (cbrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(pow.f64 (exp.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(sqrt.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(sqrt.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) 2))
(fabs.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(log.f64 (exp.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log.f64 (+.f64 1 (expm1.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(cbrt.f64 (pow.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(expm1.f64 (log1p.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(log1p.f64 (expm1.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(fma.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 1)
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(fma.f64 (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (sqrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1)
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))
(fma.f64 (pow.f64 (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2) (cbrt.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1)
(exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))

localize46.0ms (0.2%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
99.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
99.8%
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1)))
97.0%
(exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
91.4%
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1)
Compiler

Compiled 108 to 54 computations (50% saved)

series89.0ms (0.3%)

Counts
2 → 120
Calls

30 calls:

TimeVariablePointExpression
23.0ms
phi2
@-inf
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1)
8.0ms
lambda2
@0
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1)
5.0ms
lambda1
@0
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1)
4.0ms
phi2
@0
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1)
4.0ms
R
@inf
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1)

rewrite139.0ms (0.5%)

Algorithm
batch-egg-rewrite
Rules
1614×associate-*r/
1296×associate-*l/
416×add-sqr-sqrt
408×*-un-lft-identity
404×pow1
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
02090
142088
2511688
Stop Event
node limit
Counts
2 → 107
Calls
Call 1
Inputs
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1)
(exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
Outputs
(((+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((+.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((+.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((+.f64 1 (-.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((+.f64 0 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((+.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) -2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((+.f64 -1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((+.f64 (+.f64 -1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) R) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (sqrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) (*.f64 (sqrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) R)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (sqrt.f64 R) (*.f64 (sqrt.f64 R) (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (*.f64 (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) R)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 R) 2) (*.f64 (cbrt.f64 R) (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1) (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (*.f64 R (sqrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (sqrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (*.f64 R (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) (sqrt.f64 R)) (sqrt.f64 R)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) (pow.f64 (cbrt.f64 R) 2)) (cbrt.f64 R)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (+.f64 1 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))) (-.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 1 (/.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 1 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (-.f64 1 (*.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) -1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)) (neg.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) 1) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) 1) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (-.f64 1 (*.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) -1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1) 1) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1))) (neg.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 1 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)))) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1))) (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1))) (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)) 1) (neg.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)) (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2)) (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2)) 1) (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (+.f64 1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) 3) 1) (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2)) (+.f64 1 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) (+.f64 1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) 3) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) (+.f64 1 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((log.f64 (pow.f64 (exp.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) R)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) 3) (pow.f64 R 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((fma.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((fma.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((fma.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)))
(((+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((+.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((+.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((+.f64 0 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((+.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((+.f64 -1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((-.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((-.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (-.f64 (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (-.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) (*.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) (pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2) (*.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (-.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (-.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3)) (+.f64 1 (-.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 1 (-.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (-.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 1 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3))) (+.f64 1 (-.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) 1) (-.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((/.f64 (*.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((pow.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((pow.f64 (E.f64) (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((pow.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) (sqrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((sqrt.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((log.f64 (exp.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((cbrt.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((expm1.f64 (log.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)) ((log1p.f64 (expm1.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1) (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) #f)))

simplify485.0ms (1.7%)

Algorithm
egg-herbie
Rules
1308×associate-+r+
1174×associate-+l+
1162×*-commutative
752×+-commutative
518×fma-def
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0157762275
1602462157
Stop Event
node limit
Counts
227 → 426
Calls
Call 1
Inputs
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(+.f64 (*.f64 (+.f64 (*.f64 -1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (pow.f64 R 2)) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(+.f64 (*.f64 (+.f64 (*.f64 -1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (pow.f64 R 2)) (+.f64 (*.f64 (pow.f64 R 3) (+.f64 (*.f64 1/3 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (+.f64 (*.f64 1/6 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 -1/2 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))
(+.f64 (*.f64 (+.f64 (*.f64 -1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (pow.f64 R 2)) (+.f64 (*.f64 (pow.f64 R 4) (+.f64 (*.f64 -1/2 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 2)) (+.f64 (*.f64 1/3 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 2)) (+.f64 (*.f64 1/24 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 2)) (*.f64 1/8 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 2)))))) (+.f64 (*.f64 (pow.f64 R 3) (+.f64 (*.f64 1/3 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (+.f64 (*.f64 1/6 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 -1/2 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))
(-.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) 1)
(-.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (pow.f64 R 3)) (+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (pow.f64 R 3)) (+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/8 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/12 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/120 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (*.f64 1/5 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5))))))))))) (pow.f64 R 5))))) 1)
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) 1)
(-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) 1)
(-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 -1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (pow.f64 R 3))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))) 1)
(-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 -1/8 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/120 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/12 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/5 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (*.f64 1/4 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (pow.f64 R 5))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 -1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (pow.f64 R 3))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))) 1)
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))))) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) (pow.f64 lambda1 2))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (*.f64 (/.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (+.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (pow.f64 R 3))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (*.f64 3 (/.f64 (*.f64 lambda2 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))) (*.f64 lambda2 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) (pow.f64 lambda1 3))) (+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))))) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) (pow.f64 lambda1 2))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda1) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda1) (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (pow.f64 lambda1 2)))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda1) (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (pow.f64 lambda1 2)) (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (/.f64 (*.f64 lambda2 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2))) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) R))) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))))))) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))))) (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3))))) (pow.f64 lambda1 3))))) 1)
(-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1))))) 1)
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) lambda1)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) 1)
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) lambda1)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2)))))) (*.f64 1/2 (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) (pow.f64 lambda1 2)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1))))))) 1)
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) lambda1)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2))))))) (+.f64 (*.f64 1/6 (+.f64 (*.f64 -3 (/.f64 (*.f64 lambda2 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (pow.f64 R 3)))) (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) R)))))) (*.f64 1/6 (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 3)))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) (pow.f64 lambda1 3))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2)))))) (*.f64 1/2 (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) (pow.f64 lambda1 2)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))))) 1)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (*.f64 (pow.f64 R 2) (pow.f64 lambda1 2))) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) R) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (*.f64 (pow.f64 R 2) (pow.f64 lambda1 2))) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2))))) (*.f64 (pow.f64 lambda2 2) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (*.f64 (pow.f64 R 2) (pow.f64 lambda1 2))) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) R) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (*.f64 (pow.f64 R 2) (pow.f64 lambda1 2))) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2))))) (*.f64 (pow.f64 lambda2 2) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))))) (+.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (+.f64 (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) lambda1))) (*.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))))) (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (/.f64 (*.f64 (pow.f64 R 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (pow.f64 lambda1 3))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 3))))))) (+.f64 (*.f64 -1/6 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (*.f64 (pow.f64 R 3) (pow.f64 lambda1 3))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 3)))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (*.f64 (pow.f64 R 2) (pow.f64 lambda1 2))) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) R) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))
(-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2))))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) lambda2) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) lambda2) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2)) (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2))))))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) (pow.f64 lambda2 2)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2))))))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) lambda2) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2)) (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2))))))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) (pow.f64 lambda2 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2))))) (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))))) (+.f64 (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 3)) (*.f64 1/6 (+.f64 (*.f64 3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) lambda1) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) 1) (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) R))) (*.f64 2 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) 1) 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (pow.f64 R 3))))))))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) (pow.f64 lambda2 3)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))))) 1)
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) 1)
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) 1)
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda2)) (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) 2)) (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 1) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))))) (pow.f64 lambda2 2)))) 1)
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) 3)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 1) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))))) (*.f64 1/6 (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 1) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 1) (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) R))) (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) lambda1) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (pow.f64 lambda2 3))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda2)) (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) 2)) (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 1) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))))) (pow.f64 lambda2 2))))) 1)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2) (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2) (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) R) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2) (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) R) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 R phi2)) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) phi2)) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2) (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))) (/.f64 (*.f64 (pow.f64 R 3) (pow.f64 phi2 3)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 3)))) (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))) (/.f64 (*.f64 R (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) phi2)) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)))))))) (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 R 3) (pow.f64 phi2 3)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2) (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2) (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) R) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))))))
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) 1)
(-.f64 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (+.f64 (*.f64 -1 phi2) (/.f64 1 R))) phi1)) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) 2)) (*.f64 1/2 (-.f64 (+.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi2) 2))))) (pow.f64 phi1 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))) phi1) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) 2)) (*.f64 1/2 (-.f64 (+.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi2) 2))))) (pow.f64 phi1 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))) phi1) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) (+.f64 (*.f64 -1 (*.f64 R phi2)) 1)) R)) (+.f64 (*.f64 3 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) phi2)) (*.f64 2 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 3) (pow.f64 R 3)))))) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi2) 2)) (+.f64 (*.f64 -1 phi2) (/.f64 1 R)))) (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) 3)))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))) (pow.f64 phi1 3)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))))) 1)
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))) 1)
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))) (+.f64 phi2 (/.f64 1 R))) phi1)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (/.f64 1 R) phi2) 2)) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 R phi2) 1) 2) (pow.f64 R 2)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) (pow.f64 phi1 2)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))) (+.f64 phi2 (/.f64 1 R))) phi1)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))))) 1)
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 1 R) phi2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 R phi2) 1) 2) (pow.f64 R 2)))))) (+.f64 (*.f64 1/6 (+.f64 (*.f64 -3 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 (*.f64 R phi2) 1) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 2 (/.f64 (pow.f64 (+.f64 (*.f64 R phi2) 1) 3) (pow.f64 R 3)))))) (*.f64 1/6 (pow.f64 (+.f64 (/.f64 1 R) phi2) 3)))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) (pow.f64 phi1 3))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (/.f64 1 R) phi2) 2)) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 R phi2) 1) 2) (pow.f64 R 2)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) (pow.f64 phi1 2)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))) (+.f64 phi2 (/.f64 1 R))) phi1)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))))) 1)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R)
(+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 phi1 (*.f64 R phi2)))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 phi1 (*.f64 R phi2)))) (*.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) (*.f64 (+.f64 (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (pow.f64 phi2 2)))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 (*.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) (*.f64 (+.f64 (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (pow.f64 phi2 2))) (*.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) (*.f64 (pow.f64 phi2 3) (+.f64 (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 phi1 3) (pow.f64 R 3)) (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 3))))) (+.f64 (*.f64 1/6 (+.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 phi1 3) (pow.f64 R 3)) (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 3))))) (+.f64 (*.f64 3 (*.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) phi1)) 2)) R)) (*.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 phi1 (pow.f64 R 2))) (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 phi1 (*.f64 R (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))))))))))
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (-.f64 (+.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 phi1 R)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi1) 2))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) (pow.f64 phi2 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R))))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R))) (+.f64 (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) 3)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 phi1 R)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi1) 2)) (+.f64 (*.f64 -1 phi1) (/.f64 1 R)))) (*.f64 1/6 (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 phi1 R)) 1) 3) (pow.f64 R 3))) (+.f64 (*.f64 3 (*.f64 phi1 (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2)))) (*.f64 -3 (/.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 phi1 R)) 1) (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2))) R)))))))) (pow.f64 phi2 3)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (-.f64 (+.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 phi1 R)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi1) 2))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) (pow.f64 phi2 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))))) 1)
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))) 1)
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 phi1 (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) phi2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) 1)
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2)) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (pow.f64 R 2))))))) (pow.f64 phi2 2)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 phi1 (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) phi2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))))) 1)
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 phi1 (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) phi2)) (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 3)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 phi1 (/.f64 1 R)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (pow.f64 R 2)))))) (*.f64 1/6 (+.f64 (*.f64 -3 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 1 (*.f64 phi1 R)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 3) (pow.f64 R 3)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) (pow.f64 phi2 3))) (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2)) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (pow.f64 R 2)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) (pow.f64 phi2 2))))) 1)
1
(+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 -1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (pow.f64 R 2)) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))
(+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 -1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (pow.f64 R 2)) (+.f64 (*.f64 (pow.f64 R 3) (+.f64 (*.f64 1/3 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (+.f64 (*.f64 1/6 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 -1/2 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))
(exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))
(+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (pow.f64 R 3)) (+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (pow.f64 R 3)) (+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/8 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/12 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/120 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (*.f64 1/5 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5))))))))))) (pow.f64 R 5)))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (pow.f64 R 3))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 -1/120 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/8 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/12 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/5 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (*.f64 1/4 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (pow.f64 R 5))) (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (pow.f64 R 3))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))))
(+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 1 (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 2)))) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))))) (*.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (pow.f64 lambda1 2))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 2)))) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))))) (*.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (pow.f64 lambda1 2))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (/.f64 (*.f64 lambda2 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 2)))) (+.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (*.f64 3 (*.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 lambda2 (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (pow.f64 R 3))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (*.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (pow.f64 lambda1 3)))))))
(exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1))))) (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))) lambda1))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2)))))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))) (pow.f64 lambda1 2)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1))))) (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))) lambda1)))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2)))))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))) (pow.f64 lambda1 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 3)) (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (/.f64 (*.f64 lambda2 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2))) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (pow.f64 R 3)))) (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2)) (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))))))) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2))))))))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))) (pow.f64 lambda1 3)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1))))) (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))) lambda1))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda1)))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 1/2 (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (pow.f64 lambda1 2)) (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda1))))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/6 (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))))) (*.f64 1/6 (+.f64 (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (*.f64 -3 (/.f64 (*.f64 lambda2 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))))))) (pow.f64 lambda1 3))) (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 1/2 (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (pow.f64 lambda1 2)) (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda1)))))
(+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R))
(+.f64 1 (+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (pow.f64 lambda1 2))) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 2) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (pow.f64 lambda1 2))) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 2) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R))))))) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) (pow.f64 lambda2 2))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R))))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (pow.f64 lambda1 2))) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 2) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (pow.f64 lambda1 2))) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 2) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R))))))) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) (pow.f64 lambda2 2))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (+.f64 (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (+.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 R 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (pow.f64 lambda1 3))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) 3))))) (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) lambda1))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 2))))))) (+.f64 (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (*.f64 (pow.f64 R 3) (pow.f64 lambda1 3))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) 3))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (pow.f64 lambda1 2))) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 2) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R))))) lambda1))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))))) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))
(+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (pow.f64 lambda2 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (pow.f64 lambda2 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3)) (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) lambda1) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (*.f64 -3 (/.f64 (*.f64 (+.f64 1 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)))) (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2))) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))))))) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (pow.f64 lambda2 3)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))
(exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))) lambda2)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))) lambda2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2)))))) (*.f64 1/2 (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))) (pow.f64 lambda2 2)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))) lambda2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2)))))) (*.f64 1/2 (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))) (pow.f64 lambda2 2)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))) (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2))) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))) 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (pow.f64 R 3)))) (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) lambda1) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 (*.f64 1/6 (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 3)) (*.f64 1/2 (*.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2))))))))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))) (pow.f64 lambda2 3))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2))))))))
(+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 1 (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (/.f64 (*.f64 R (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2))))))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 1 (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R) (+.f64 (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (/.f64 (*.f64 R (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2))))))) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (/.f64 (*.f64 R (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2))))) (*.f64 R phi2)) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (+.f64 (*.f64 1/6 (+.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))) (/.f64 (*.f64 (pow.f64 R 3) (pow.f64 phi2 3)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 3)))) (+.f64 (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))) (/.f64 (*.f64 R (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) phi2)) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))))) (*.f64 3 (/.f64 (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) (*.f64 (pow.f64 R 2) phi2)) (*.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2))))))) (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 R 3) (pow.f64 phi2 3)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))))))) (pow.f64 phi1 3)))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (+.f64 (*.f64 -1 phi2) (/.f64 1 R))) phi1))
(+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) 2)) (*.f64 1/2 (-.f64 (+.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi2) 2))))) (pow.f64 phi1 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))) phi1) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))))
(+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) 2)) (*.f64 1/2 (-.f64 (+.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi2) 2))))) (pow.f64 phi1 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))) phi1) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) (+.f64 (*.f64 -1 (*.f64 R phi2)) 1)) R)) (+.f64 (*.f64 3 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) phi2)) (*.f64 2 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 3) (pow.f64 R 3)))))) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi2) 2)) (+.f64 (*.f64 -1 phi2) (/.f64 1 R)))) (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) 3)))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))) (pow.f64 phi1 3)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (/.f64 1 R) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) phi1)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (/.f64 1 R) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) phi1)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 R phi2)) 2) (pow.f64 R 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/2 (pow.f64 (+.f64 phi2 (/.f64 1 R)) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) (pow.f64 phi1 2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 phi2 (/.f64 1 R)) 3)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 R phi2)) 2) (pow.f64 R 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 phi2 (/.f64 1 R)))) (*.f64 1/6 (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 1 (*.f64 R phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (+.f64 (*.f64 -3 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 R phi2)) 3) (pow.f64 R 3)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) (pow.f64 phi1 3))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (/.f64 1 R) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) phi1)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 R phi2)) 2) (pow.f64 R 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/2 (pow.f64 (+.f64 phi2 (/.f64 1 R)) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) (pow.f64 phi1 2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))))))
(+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))
(+.f64 1 (+.f64 (*.f64 -1 (*.f64 (*.f64 phi1 (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) phi1)) 2)) R) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))) (*.f64 (pow.f64 phi2 2) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (*.f64 phi1 (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) phi1)) 2)) R) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))) (*.f64 (pow.f64 phi2 2) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (*.f64 phi1 (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (pow.f64 phi2 3) (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (*.f64 (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 phi1 R)) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 phi1 3) (pow.f64 R 3)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 3))))) (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (/.f64 (*.f64 phi1 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) phi1)) 2)) (pow.f64 R 2))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 phi1 (*.f64 R (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) phi1)) 2)) R) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 phi1 3) (pow.f64 R 3)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 3))))))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R))))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) phi2) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 phi1 R))) 2) (pow.f64 R 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) (pow.f64 (*.f64 -1 phi1) 2))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) (pow.f64 phi2 2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) phi2) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) 3)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 phi1 R))) 2) (pow.f64 R 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) (pow.f64 (*.f64 -1 phi1) 2)) (+.f64 (*.f64 -1 phi1) (/.f64 1 R)))) (*.f64 1/6 (+.f64 (*.f64 3 (*.f64 phi1 (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2)))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2)) (+.f64 1 (*.f64 -1 (*.f64 phi1 R)))) R)) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 phi1 R))) 3) (pow.f64 R 3)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) (pow.f64 phi2 3)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 phi1 R))) 2) (pow.f64 R 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) (pow.f64 (*.f64 -1 phi1) 2))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) (pow.f64 phi2 2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 phi1 (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) phi2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))))
(+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2)) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (pow.f64 R 2))))))) (pow.f64 phi2 2)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 phi1 (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) phi2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 phi1 (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) phi2)) (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 3)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 phi1 (/.f64 1 R)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (pow.f64 R 2)))))) (*.f64 1/6 (+.f64 (*.f64 -3 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 1 (*.f64 phi1 R)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 3) (pow.f64 R 3)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) (pow.f64 phi2 3))) (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2)) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (pow.f64 R 2)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) (pow.f64 phi2 2)))))
(+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 0)
(+.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) -1)
(+.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) -1))
(+.f64 1 (-.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))
(+.f64 0 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(+.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) -2)
(+.f64 -1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))
(+.f64 (+.f64 -1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 1)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
(*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) R)
(*.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)
(*.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(*.f64 (sqrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) (*.f64 (sqrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) R))
(*.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(*.f64 (sqrt.f64 R) (*.f64 (sqrt.f64 R) (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(*.f64 (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (*.f64 (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) R))
(*.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(*.f64 (pow.f64 (cbrt.f64 R) 2) (*.f64 (cbrt.f64 R) (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1) (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(*.f64 (*.f64 R (sqrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (sqrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(*.f64 (*.f64 R (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(*.f64 (*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) (sqrt.f64 R)) (sqrt.f64 R))
(*.f64 (*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) (pow.f64 (cbrt.f64 R) 2)) (cbrt.f64 R))
(*.f64 (+.f64 1 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))) (-.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 1))
(/.f64 1 (/.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)))
(/.f64 1 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (-.f64 1 (*.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) -1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)) (neg.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) 1) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) 1) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (-.f64 1 (*.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) -1))))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1) 1) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))
(/.f64 (*.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1))) (neg.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (*.f64 1 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)))) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1))) (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1))) (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)) 1) (neg.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (*.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)) (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2)) (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2)) 1) (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (+.f64 1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2)))
(/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) 3) 1) (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2)) (+.f64 1 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) 1))))
(/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) (+.f64 1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)))
(/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) 3) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) (+.f64 1 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) 1))))
(pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)
(pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2)
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 3)
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))
(log.f64 (pow.f64 (exp.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) R))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) 3)))
(cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) 3) (pow.f64 R 3)))
(expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 1))
(log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(fma.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) -1)
(fma.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) -1)
(fma.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) -1)
(+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)
(+.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 0)
(+.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(+.f64 0 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))
(+.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) -1)
(+.f64 -1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))
(-.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 0)
(-.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) 1)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (-.f64 (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) 1))
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (-.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) 1))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(*.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 1)
(*.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))
(*.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) (*.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 1))
(*.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) (pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2) (*.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 1))
(/.f64 (-.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (-.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3)) (+.f64 1 (-.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(/.f64 (*.f64 1 (-.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (-.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(/.f64 (*.f64 1 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3))) (+.f64 1 (-.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) 1) (-.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 1)
(pow.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2)
(pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 3)
(pow.f64 (E.f64) (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(pow.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) 1/3)
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) (sqrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(sqrt.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2))
(log.f64 (exp.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)))
(log.f64 (+.f64 1 (expm1.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))))
(cbrt.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))
(expm1.f64 (log.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(log1p.f64 (expm1.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)))
Outputs
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(+.f64 (*.f64 (+.f64 (*.f64 -1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (pow.f64 R 2)) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(fma.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 0) (*.f64 R R) (*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(+.f64 (*.f64 (+.f64 (*.f64 -1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (pow.f64 R 2)) (+.f64 (*.f64 (pow.f64 R 3) (+.f64 (*.f64 1/3 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (+.f64 (*.f64 1/6 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 -1/2 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))
(fma.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 0) (*.f64 R R) (fma.f64 (pow.f64 R 3) (fma.f64 1/3 (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)) (*.f64 (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)) -1/3)) (*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)))
(+.f64 (*.f64 (+.f64 (*.f64 -1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (pow.f64 R 2)) (+.f64 (*.f64 (pow.f64 R 4) (+.f64 (*.f64 -1/2 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 2)) (+.f64 (*.f64 1/3 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 2)) (+.f64 (*.f64 1/24 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 2)) (*.f64 1/8 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 2)))))) (+.f64 (*.f64 (pow.f64 R 3) (+.f64 (*.f64 1/3 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (+.f64 (*.f64 1/6 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 -1/2 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))
(fma.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 0) (*.f64 R R) (fma.f64 (pow.f64 R 4) (fma.f64 -1/2 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 2) (fma.f64 1/3 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 2) 1/6))) (fma.f64 (pow.f64 R 3) (fma.f64 1/3 (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)) (*.f64 (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)) -1/3)) (*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R))))
(-.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) 1)
(expm1.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R)))))
(-.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 1)
(+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (-.f64 (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 1))
(+.f64 (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (expm1.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))))
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (pow.f64 R 3)) (+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) 1)
(+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (/.f64 (pow.f64 R 3) (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3)))) (+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (-.f64 (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 1)))
(+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (/.f64 (pow.f64 R 3) (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3)))) (+.f64 (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (expm1.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R)))))))
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (pow.f64 R 3)) (+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/8 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/12 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/120 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (*.f64 1/5 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5))))))))))) (pow.f64 R 5))))) 1)
(+.f64 (+.f64 (+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (/.f64 (pow.f64 R 3) (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3)))) (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R)))))) (fma.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (/.f64 (pow.f64 R 5) (fma.f64 -1/4 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/8 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 -1/12 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/120 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) 1/30)))))))))) -1)
(+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (/.f64 (pow.f64 R 3) (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3)))) (+.f64 (fma.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (/.f64 (pow.f64 R 5) (fma.f64 -1/4 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/8 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 -1/12 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/120 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) 1/30))))))))) (expm1.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R)))))))
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) 1)
(expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) 1)
(+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 -1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (pow.f64 R 3))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))) 1)
(+.f64 (fma.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) R) (fma.f64 -1 (/.f64 (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3)) (/.f64 (pow.f64 R 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))) -1)
(+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (+.f64 (neg.f64 (/.f64 (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3)) (/.f64 (pow.f64 R 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))))))) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 -1/8 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/120 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/12 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/5 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (*.f64 1/4 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (pow.f64 R 5))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 -1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (pow.f64 R 3))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))) 1)
(+.f64 (fma.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) R) (fma.f64 -1 (/.f64 (fma.f64 -1/8 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 -1/120 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/12 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 -1/5 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) 1/12)))))) (/.f64 (pow.f64 R 5) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))) (fma.f64 -1 (/.f64 (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3)) (/.f64 (pow.f64 R 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))))))) -1)
(+.f64 (fma.f64 -1 (/.f64 (fma.f64 -1/120 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 -1/8 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/12 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) 1/20)))))) (/.f64 (pow.f64 R 5) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))) (fma.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) R) (fma.f64 -1 (/.f64 (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3)) (/.f64 (pow.f64 R 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))))))) -1)
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(fma.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (neg.f64 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))))) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) (pow.f64 lambda1 2))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(fma.f64 (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))) (fma.f64 (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 (/.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))))) (*.f64 (*.f64 lambda1 lambda1) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (neg.f64 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (*.f64 (/.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (+.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (pow.f64 R 3))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (*.f64 3 (/.f64 (*.f64 lambda2 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))) (*.f64 lambda2 (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) (pow.f64 lambda1 3))) (+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))))) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) (pow.f64 lambda1 2))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(fma.f64 (fma.f64 1/6 (fma.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (/.f64 lambda2 (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2))))))) (fma.f64 -2 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 lambda2 3) (pow.f64 R 3)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 3)) (*.f64 3 (/.f64 (*.f64 (*.f64 lambda2 (*.f64 R R)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)))) (*.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 2)))))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (fma.f64 (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 (/.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))) (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 (*.f64 lambda2 R) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (*.f64 -1/6 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 lambda2 3) (pow.f64 R 3)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 3))))) (*.f64 (pow.f64 lambda1 3) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))) (fma.f64 (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 (/.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))))) (*.f64 (*.f64 lambda1 lambda1) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (neg.f64 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))))
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) 1)
(expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda1) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) 1)
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda1 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda1) (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (pow.f64 lambda1 2)))) 1)
(+.f64 (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (pow.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))))) (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda1 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))) -1)
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda1 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 1/2 (+.f64 (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))))) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda1) (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (pow.f64 lambda1 2)) (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (/.f64 (*.f64 lambda2 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2))) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) R))) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))))))) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))))) (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3))))) (pow.f64 lambda1 3))))) 1)
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda1 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (-.f64 (+.f64 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (pow.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))))) (/.f64 (fma.f64 1/6 (fma.f64 3 (/.f64 lambda2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))) 2)))) (fma.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 -3 (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))) 2)) R) (/.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))))) (fma.f64 1/2 (*.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))))) (*.f64 1/6 (pow.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3)))) (/.f64 (pow.f64 lambda1 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))) 1))
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda1 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (+.f64 (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 1/2 (+.f64 (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))))) (/.f64 (fma.f64 1/6 (fma.f64 3 (/.f64 lambda2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))) 2)))) (fma.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 -3 (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))) 2)) R) (/.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))))) (fma.f64 1/2 (*.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))))) (*.f64 1/6 (pow.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3)))) (/.f64 (pow.f64 lambda1 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))
(-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1))))) 1)
(expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) lambda1)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) 1)
(+.f64 (neg.f64 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda1)) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) lambda1)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2)))))) (*.f64 1/2 (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) (pow.f64 lambda1 2)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1))))))) 1)
(+.f64 (fma.f64 -1 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda1) (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))) (/.f64 (*.f64 lambda1 lambda1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))) -1)
(+.f64 (neg.f64 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda1)) (+.f64 (/.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))) (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (/.f64 (*.f64 lambda1 lambda1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) lambda1)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2))))))) (+.f64 (*.f64 1/6 (+.f64 (*.f64 -3 (/.f64 (*.f64 lambda2 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (pow.f64 R 3)))) (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) R)))))) (*.f64 1/6 (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 3)))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) (pow.f64 lambda1 3))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2)))))) (*.f64 1/2 (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))) (pow.f64 lambda1 2)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda1)))))))) 1)
(+.f64 (fma.f64 -1 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda1) (fma.f64 -1 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (pow.f64 lambda1 3) (fma.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (*.f64 1/6 (+.f64 (fma.f64 -3 (/.f64 lambda2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda2) 2)))) (fma.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 -3 (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda2) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (/.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) R))))) (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3)))))) (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))) (/.f64 (*.f64 lambda1 lambda1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))))) -1)
(+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda1)) (neg.f64 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (pow.f64 lambda1 3) (fma.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (*.f64 1/6 (+.f64 (fma.f64 -3 (/.f64 lambda2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda2) 2)))) (fma.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 -3 (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda2) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (/.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) R))))) (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3)))))))) (+.f64 (/.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))) (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (/.f64 (*.f64 lambda1 lambda1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (*.f64 (pow.f64 R 2) (pow.f64 lambda1 2))) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) R) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (*.f64 (pow.f64 R 2) (pow.f64 lambda1 2))) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2))))) (*.f64 (pow.f64 lambda2 2) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))
(fma.f64 (*.f64 1/2 (+.f64 (fma.f64 -1 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))) (*.f64 (*.f64 lambda2 lambda2) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (*.f64 (pow.f64 R 2) (pow.f64 lambda1 2))) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) R) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (*.f64 (pow.f64 R 2) (pow.f64 lambda1 2))) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2))))) (*.f64 (pow.f64 lambda2 2) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))))) (+.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (+.f64 (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) lambda1))) (*.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))))) (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (/.f64 (*.f64 (pow.f64 R 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (pow.f64 lambda1 3))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 3))))))) (+.f64 (*.f64 -1/6 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (*.f64 (pow.f64 R 3) (pow.f64 lambda1 3))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 3)))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (*.f64 (pow.f64 R 2) (pow.f64 lambda1 2))) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 2)))) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) R) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))
(fma.f64 (*.f64 1/2 (+.f64 (fma.f64 -1 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))) (*.f64 (*.f64 lambda2 lambda2) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 (pow.f64 lambda2 3) (*.f64 (fma.f64 1/6 (fma.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2) (*.f64 (*.f64 R R) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))))) (fma.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) R) (*.f64 lambda1 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))) (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (*.f64 -2 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (/.f64 (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 3) (*.f64 (pow.f64 R 3) (pow.f64 lambda1 3)))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (fma.f64 -1/6 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (/.f64 (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 3) (*.f64 (pow.f64 R 3) (pow.f64 lambda1 3)))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 (*.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (/.f64 (fma.f64 -1 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R))))))) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2))))) 1)
(expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))
(-.f64 (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) lambda2) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) 1)
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda2 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))
(-.f64 (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) lambda2) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2)) (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2))))))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) (pow.f64 lambda2 2)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2))))))) 1)
(+.f64 (+.f64 (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda2 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (/.f64 (*.f64 1/2 (+.f64 (pow.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) -1)
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda2 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (+.f64 (/.f64 (*.f64 1/2 (+.f64 (pow.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))
(-.f64 (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) lambda2) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2)) (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2))))))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) (pow.f64 lambda2 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2))))) (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))))) (+.f64 (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 3)) (*.f64 1/6 (+.f64 (*.f64 3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) lambda1) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) 1) (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) R))) (*.f64 2 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))) 1) 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (pow.f64 R 3))))))))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))) (pow.f64 lambda2 3)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda2)))))))) 1)
(+.f64 (+.f64 (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda2 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (/.f64 (*.f64 1/2 (+.f64 (pow.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))) (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (fma.f64 1/2 (*.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 1/6 (+.f64 (pow.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (fma.f64 3 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1)) (fma.f64 -3 (*.f64 (/.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) R) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 2 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))))))))) (/.f64 (pow.f64 lambda2 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))) -1)
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda2 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (+.f64 (+.f64 (/.f64 (*.f64 1/2 (+.f64 (pow.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (/.f64 (fma.f64 1/2 (*.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 1/6 (+.f64 (pow.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (fma.f64 3 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1)) (fma.f64 -3 (*.f64 (/.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) R) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 2 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))))))))) (/.f64 (pow.f64 lambda2 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) 1)
(expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) 1)
(+.f64 (neg.f64 (/.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (/.f64 lambda2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda2)) (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) 2)) (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 1) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))))) (pow.f64 lambda2 2)))) 1)
(+.f64 (+.f64 (fma.f64 -1 (/.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (/.f64 lambda2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (/.f64 (*.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))) -1)
(+.f64 (neg.f64 (/.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (/.f64 lambda2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))) (+.f64 (/.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (neg.f64 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))) (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) 3)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 1) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))))) (*.f64 1/6 (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 1) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 1) (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) R))) (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) lambda1) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (pow.f64 lambda2 3))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda2)) (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) 2)) (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 1) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))))) (pow.f64 lambda2 2))))) 1)
(+.f64 (fma.f64 -1 (/.f64 (fma.f64 1/6 (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (fma.f64 1/2 (*.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))))) (*.f64 1/6 (fma.f64 2 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 -3 (+.f64 (*.f64 (/.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) R) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1)))))))) (/.f64 (pow.f64 lambda2 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (+.f64 (fma.f64 -1 (/.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (/.f64 lambda2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (/.f64 (*.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))) -1)
(+.f64 (neg.f64 (/.f64 (fma.f64 1/6 (fma.f64 2 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 -3 (+.f64 (*.f64 (/.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) R) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))))) (fma.f64 1/6 (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (*.f64 1/2 (*.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))))))) (/.f64 (pow.f64 lambda2 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))) (+.f64 (neg.f64 (/.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (/.f64 lambda2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))) (+.f64 (/.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (neg.f64 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))) (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)
(*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 (*.f64 phi2 R))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2) (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2) (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) R) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 (*.f64 phi2 R))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))) R (*.f64 (*.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) (*.f64 phi1 phi1)) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 phi2) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (fma.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (/.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))) (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) R)) (neg.f64 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 phi2) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 (pow.f64 phi1 3) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2) (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) R) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 R phi2)) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) phi2)) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2) (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (+.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))) (/.f64 (*.f64 (pow.f64 R 3) (pow.f64 phi2 3)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 3)))) (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))) (/.f64 (*.f64 R (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) phi2)) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)))))))) (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 R 3) (pow.f64 phi2 3)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2) (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2) (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) R) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 (*.f64 phi2 R))) (fma.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) (*.f64 (pow.f64 phi1 3) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (/.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))) (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) R)) (neg.f64 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 phi2) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) (*.f64 phi2 R)))) (fma.f64 1/6 (fma.f64 3 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2)))) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (fma.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)) 3))) (/.f64 (pow.f64 R 3) (/.f64 (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 3) (pow.f64 phi2 3)))) (*.f64 (*.f64 3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)) 3)))) (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) (*.f64 phi2 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))))))))) (*.f64 -1/6 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)) 3))) (/.f64 (pow.f64 R 3) (/.f64 (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 3) (pow.f64 phi2 3)))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))) R (*.f64 (*.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) (*.f64 phi1 phi1)) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 phi2) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (fma.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (/.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))) (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) R)) (neg.f64 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 phi2) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))))))))))
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) 1)
(expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R)))
(-.f64 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (+.f64 (*.f64 -1 phi2) (/.f64 1 R))) phi1)) 1)
(+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (-.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 phi1 (fma.f64 -1 phi2 (/.f64 1 R)))) 1))
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 phi1 (fma.f64 -1 phi2 (/.f64 1 R)))) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))))
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) 2)) (*.f64 1/2 (-.f64 (+.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi2) 2))))) (pow.f64 phi1 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))) phi1) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))))) 1)
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 (*.f64 phi1 phi1) (*.f64 1/2 (+.f64 (pow.f64 (fma.f64 -1 phi2 (/.f64 1 R)) 2) (+.f64 (*.f64 phi2 phi2) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 2) (*.f64 R R)))) (pow.f64 (neg.f64 phi2) 2))))))) (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (-.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 phi1 (fma.f64 -1 phi2 (/.f64 1 R)))) 1)))
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 (*.f64 phi1 phi1) (*.f64 1/2 (+.f64 (+.f64 (pow.f64 (fma.f64 -1 phi2 (/.f64 1 R)) 2) (*.f64 phi2 phi2)) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 2) (*.f64 R R)))) (pow.f64 (neg.f64 phi2) 2)))))) (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 phi1 (fma.f64 -1 phi2 (/.f64 1 R)))) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R)))))
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) 2)) (*.f64 1/2 (-.f64 (+.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi2) 2))))) (pow.f64 phi1 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))) phi1) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) (+.f64 (*.f64 -1 (*.f64 R phi2)) 1)) R)) (+.f64 (*.f64 3 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) phi2)) (*.f64 2 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 3) (pow.f64 R 3)))))) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi2) 2)) (+.f64 (*.f64 -1 phi2) (/.f64 1 R)))) (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) 3)))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))) (pow.f64 phi1 3)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))))) 1)
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 (*.f64 phi1 phi1) (*.f64 1/2 (+.f64 (pow.f64 (fma.f64 -1 phi2 (/.f64 1 R)) 2) (+.f64 (*.f64 phi2 phi2) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 2) (*.f64 R R)))) (pow.f64 (neg.f64 phi2) 2))))))) (-.f64 (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 phi1 (fma.f64 -1 phi2 (/.f64 1 R)))) (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 (fma.f64 1/6 (fma.f64 -3 (/.f64 (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (neg.f64 phi2) 2))) (/.f64 R (fma.f64 -1 (*.f64 phi2 R) 1))) (fma.f64 3 (*.f64 phi2 (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 2 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 3) (pow.f64 R 3))))) (fma.f64 1/2 (*.f64 (fma.f64 -1 phi2 (/.f64 1 R)) (+.f64 (*.f64 phi2 phi2) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 2) (*.f64 R R)))) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 1/6 (pow.f64 (fma.f64 -1 phi2 (/.f64 1 R)) 3)))) (/.f64 (pow.f64 phi1 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))))))) 1))
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 (*.f64 phi1 phi1) (*.f64 1/2 (+.f64 (+.f64 (pow.f64 (fma.f64 -1 phi2 (/.f64 1 R)) 2) (*.f64 phi2 phi2)) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 2) (*.f64 R R)))) (pow.f64 (neg.f64 phi2) 2)))))) (+.f64 (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 phi1 (fma.f64 -1 phi2 (/.f64 1 R)))) (/.f64 (fma.f64 1/6 (fma.f64 -3 (/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (-.f64 (*.f64 phi2 phi2) (pow.f64 (neg.f64 phi2) 2))) (/.f64 R (fma.f64 -1 (*.f64 phi2 R) 1))) (fma.f64 3 (*.f64 phi2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (-.f64 (*.f64 phi2 phi2) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 2 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 3) (pow.f64 R 3))))) (fma.f64 1/2 (*.f64 (fma.f64 -1 phi2 (/.f64 1 R)) (+.f64 (*.f64 phi2 phi2) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 2) (*.f64 R R)))) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 1/6 (pow.f64 (fma.f64 -1 phi2 (/.f64 1 R)) 3)))) (/.f64 (pow.f64 phi1 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R)))))) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R)))))
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))) 1)
(expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R)))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))) (+.f64 phi2 (/.f64 1 R))) phi1)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) 1)
(+.f64 (neg.f64 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))) (/.f64 phi1 (+.f64 phi2 (/.f64 1 R))))) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))))
(-.f64 (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (/.f64 1 R) phi2) 2)) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 R phi2) 1) 2) (pow.f64 R 2)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) (pow.f64 phi1 2)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))) (+.f64 phi2 (/.f64 1 R))) phi1)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))))) 1)
(+.f64 (/.f64 (*.f64 1/2 (+.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 R phi2 1) 2) (*.f64 R R)))) (pow.f64 (+.f64 phi2 (/.f64 1 R)) 2))) (/.f64 (*.f64 phi1 phi1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))))) (+.f64 (neg.f64 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))) (/.f64 phi1 (+.f64 phi2 (/.f64 1 R))))) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R)))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 1 R) phi2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 R phi2) 1) 2) (pow.f64 R 2)))))) (+.f64 (*.f64 1/6 (+.f64 (*.f64 -3 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 (*.f64 R phi2) 1) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 2 (/.f64 (pow.f64 (+.f64 (*.f64 R phi2) 1) 3) (pow.f64 R 3)))))) (*.f64 1/6 (pow.f64 (+.f64 (/.f64 1 R) phi2) 3)))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) (pow.f64 phi1 3))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (/.f64 1 R) phi2) 2)) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 R phi2) 1) 2) (pow.f64 R 2)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) (pow.f64 phi1 2)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))) (+.f64 phi2 (/.f64 1 R))) phi1)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))))) 1)
(+.f64 (neg.f64 (/.f64 (fma.f64 1/2 (*.f64 (+.f64 phi2 (/.f64 1 R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 R phi2 1) 2) (*.f64 R R))))) (*.f64 1/6 (+.f64 (fma.f64 -3 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) phi2)) (fma.f64 -3 (/.f64 (fma.f64 R phi2 1) (/.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 2 (/.f64 (pow.f64 (fma.f64 R phi2 1) 3) (pow.f64 R 3))))) (pow.f64 (+.f64 phi2 (/.f64 1 R)) 3)))) (/.f64 (pow.f64 phi1 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R)))))) (+.f64 (/.f64 (*.f64 1/2 (+.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 R phi2 1) 2) (*.f64 R R)))) (pow.f64 (+.f64 phi2 (/.f64 1 R)) 2))) (/.f64 (*.f64 phi1 phi1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))))) (+.f64 (neg.f64 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))) (/.f64 phi1 (+.f64 phi2 (/.f64 1 R))))) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R)
(*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 phi1 (*.f64 R phi2)))))
(fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (neg.f64 (*.f64 phi1 (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 phi1 (*.f64 R phi2)))) (*.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) (*.f64 (+.f64 (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (pow.f64 phi2 2)))))
(fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (fma.f64 -1 (*.f64 phi1 (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 R R) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2))) (fma.f64 (/.f64 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (/.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (neg.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 R R) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2))))))) (*.f64 (*.f64 phi2 phi2) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1)))))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 (*.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) (*.f64 (+.f64 (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (pow.f64 phi2 2))) (*.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) (*.f64 (pow.f64 phi2 3) (+.f64 (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 phi1 3) (pow.f64 R 3)) (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 3))))) (+.f64 (*.f64 1/6 (+.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 phi1 3) (pow.f64 R 3)) (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) 3))))) (+.f64 (*.f64 3 (*.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) phi1)) 2)) R)) (*.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))) (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 phi1 (pow.f64 R 2))) (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 phi1 (*.f64 R (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) R) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1) 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) R) 1)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))))))))))))
(fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (fma.f64 -1 (*.f64 phi1 (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (*.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) (+.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 R R) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2))) (fma.f64 (/.f64 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (/.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (neg.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 R R) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2)))))))) (*.f64 (pow.f64 phi2 3) (fma.f64 -1/6 (/.f64 (*.f64 (*.f64 (pow.f64 R 3) (pow.f64 phi1 3)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 3)))) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 3)) (fma.f64 1/6 (fma.f64 -2 (/.f64 (*.f64 (*.f64 (pow.f64 R 3) (pow.f64 phi1 3)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 3)))) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 3)) (*.f64 3 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (/.f64 (*.f64 (*.f64 phi1 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2))) R) (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1)))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) (/.f64 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2) (*.f64 phi1 (*.f64 R R)))))))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (/.f64 phi1 (/.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) (*.f64 R (fma.f64 (/.f64 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (/.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (neg.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 R R) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2)))))))))))))))))
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R))) 1)
(expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R)))
(-.f64 (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) 1)
(+.f64 (/.f64 (fma.f64 -1 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))
(-.f64 (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (-.f64 (+.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 phi1 R)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi1) 2))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) (pow.f64 phi2 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R))))) 1)
(+.f64 (/.f64 (*.f64 1/2 (+.f64 (-.f64 (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi1 R) 1) 2) (*.f64 R R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (pow.f64 (neg.f64 phi1) 2)) (pow.f64 (fma.f64 -1 phi1 (/.f64 1 R)) 2))) (/.f64 (*.f64 phi2 phi2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))) (+.f64 (/.f64 (fma.f64 -1 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R)))))
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R))) (+.f64 (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) 3)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 phi1 R)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi1) 2)) (+.f64 (*.f64 -1 phi1) (/.f64 1 R)))) (*.f64 1/6 (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 phi1 R)) 1) 3) (pow.f64 R 3))) (+.f64 (*.f64 3 (*.f64 phi1 (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2)))) (*.f64 -3 (/.f64 (*.f64 (+.f64 (*.f64 -1 (*.f64 phi1 R)) 1) (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2))) R)))))))) (pow.f64 phi2 3)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (-.f64 (+.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 phi1 R)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi1) 2))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) (pow.f64 phi2 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))))) 1)
(+.f64 (/.f64 (fma.f64 1/6 (pow.f64 (fma.f64 -1 phi1 (/.f64 1 R)) 3) (fma.f64 1/2 (*.f64 (fma.f64 -1 phi1 (/.f64 1 R)) (-.f64 (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi1 R) 1) 2) (*.f64 R R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (pow.f64 (neg.f64 phi1) 2))) (*.f64 1/6 (fma.f64 3 (*.f64 phi1 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2))) (fma.f64 -3 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2)) (/.f64 R (fma.f64 -1 (*.f64 phi1 R) 1))) (/.f64 (*.f64 2 (pow.f64 (fma.f64 -1 (*.f64 phi1 R) 1) 3)) (pow.f64 R 3))))))) (/.f64 (pow.f64 phi2 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))) (+.f64 (/.f64 (*.f64 1/2 (+.f64 (-.f64 (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi1 R) 1) 2) (*.f64 R R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (pow.f64 (neg.f64 phi1) 2)) (pow.f64 (fma.f64 -1 phi1 (/.f64 1 R)) 2))) (/.f64 (*.f64 phi2 phi2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))) (+.f64 (/.f64 (fma.f64 -1 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))))
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))) 1)
(expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R)))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 phi1 (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) phi2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) 1)
(+.f64 (neg.f64 (/.f64 (+.f64 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R)))))) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R))))
(-.f64 (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2)) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (pow.f64 R 2))))))) (pow.f64 phi2 2)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 phi1 (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) phi2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))))) 1)
(+.f64 (/.f64 (*.f64 1/2 (+.f64 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (*.f64 R R)))))) (/.f64 (*.f64 phi2 phi2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R))))) (+.f64 (neg.f64 (/.f64 (+.f64 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R)))))) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R)))))
(-.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 phi1 (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) phi2)) (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 3)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 phi1 (/.f64 1 R)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (pow.f64 R 2)))))) (*.f64 1/6 (+.f64 (*.f64 -3 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 1 (*.f64 phi1 R)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 3) (pow.f64 R 3)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) (pow.f64 phi2 3))) (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2)) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (pow.f64 R 2)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) (pow.f64 phi2 2))))) 1)
(+.f64 (+.f64 (fma.f64 -1 (/.f64 (+.f64 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R)))) (fma.f64 -1 (/.f64 (fma.f64 1/6 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 3) (fma.f64 1/2 (*.f64 (+.f64 phi1 (/.f64 1 R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (*.f64 R R))))) (*.f64 1/6 (fma.f64 -3 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (fma.f64 -3 (/.f64 (+.f64 1 (*.f64 phi1 R)) (/.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 3) (pow.f64 R 3)))))))) (/.f64 (pow.f64 phi2 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R))))) (/.f64 (*.f64 1/2 (+.f64 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (*.f64 R R)))))) (/.f64 (*.f64 phi2 phi2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R))))))) -1)
(+.f64 (neg.f64 (/.f64 (+.f64 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R)))))) (+.f64 (fma.f64 -1 (/.f64 (fma.f64 1/6 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 3) (fma.f64 1/2 (*.f64 (+.f64 phi1 (/.f64 1 R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (*.f64 R R))))) (*.f64 1/6 (fma.f64 -3 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (fma.f64 -3 (/.f64 (+.f64 1 (*.f64 phi1 R)) (/.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 3) (pow.f64 R 3)))))))) (/.f64 (pow.f64 phi2 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R))))) (/.f64 (*.f64 1/2 (+.f64 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (*.f64 R R)))))) (/.f64 (*.f64 phi2 phi2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R)))))) (expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R)))))
1
(+.f64 1 (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))
(+.f64 (*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R) 1)
(+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 -1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (pow.f64 R 2)) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R)))
(+.f64 (fma.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 0) (*.f64 R R) (*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R)) 1)
(+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 -1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (pow.f64 R 2)) (+.f64 (*.f64 (pow.f64 R 3) (+.f64 (*.f64 1/3 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (+.f64 (*.f64 1/6 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 -1/2 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))) R))))
(+.f64 (fma.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 0) (*.f64 R R) (fma.f64 (pow.f64 R 3) (fma.f64 1/3 (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)) (*.f64 (sqrt.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)) -1/3)) (*.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))) R))) 1)
(exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R)))))
(exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))
(+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))
(+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (pow.f64 R 3)) (+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(+.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))) (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (/.f64 (pow.f64 R 3) (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (+.f64 (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (/.f64 (pow.f64 R 3) (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3))))))
(+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (pow.f64 R 3)) (+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) R) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (log.f64 (/.f64 1 R))))) (+.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/8 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/12 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/120 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (*.f64 1/5 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5))))))))))) (pow.f64 R 5)))))
(+.f64 (+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (/.f64 (pow.f64 R 3) (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3)))) (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R)))))) (fma.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (/.f64 (pow.f64 R 5) (fma.f64 -1/4 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/8 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 -1/12 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/120 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) 1/30))))))))))
(+.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (+.f64 (fma.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (/.f64 (pow.f64 R 5) (fma.f64 -1/4 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/8 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 -1/12 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/120 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) 1/30))))))))) (/.f64 (exp.f64 (+.f64 (log.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (neg.f64 (log.f64 R))))) (/.f64 (pow.f64 R 3) (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(fma.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) R) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (pow.f64 R 3))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(fma.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) R) (fma.f64 -1 (/.f64 (fma.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (/.f64 (pow.f64 R 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(fma.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) R) (fma.f64 -1 (/.f64 (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3)) (/.f64 (pow.f64 R 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 -1/120 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/8 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/12 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (+.f64 (*.f64 -1/5 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))) (*.f64 1/4 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 5)))))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (pow.f64 R 5))) (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))) R)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (+.f64 (*.f64 -1/3 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 1/2 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (pow.f64 R 3))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 R))) (log.f64 (*.f64 -1 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))))
(fma.f64 -1 (/.f64 (fma.f64 -1/120 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 -1/8 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/12 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) 1/20)))))) (/.f64 (pow.f64 R 5) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))) (fma.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) R) (fma.f64 -1 (/.f64 (fma.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (/.f64 (pow.f64 R 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))))
(fma.f64 -1 (/.f64 (fma.f64 -1/120 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 -1/8 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/12 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (fma.f64 -1/6 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 5))) 1/20)))))) (/.f64 (pow.f64 R 5) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))) (fma.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) R) (fma.f64 -1 (/.f64 (fma.f64 1/3 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) -1/3)) (/.f64 (pow.f64 R 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 R)) (log.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))))
(+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 1 (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(+.f64 1 (fma.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (neg.f64 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 2)))) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))))) (*.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (pow.f64 lambda1 2))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))))))
(+.f64 1 (fma.f64 (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))) (fma.f64 (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 (/.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))))) (*.f64 (*.f64 lambda1 lambda1) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (neg.f64 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))))))
(+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 2)))) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))))) (*.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (pow.f64 lambda1 2))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (/.f64 (*.f64 lambda2 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 2)))) (+.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))) (*.f64 3 (*.f64 (/.f64 (*.f64 lambda2 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 lambda2 (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4))) (*.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (pow.f64 R 3))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) 3))))))) (*.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2))))) (pow.f64 lambda1 3)))))))
(+.f64 1 (fma.f64 (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))) (fma.f64 (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 (/.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))))) (*.f64 (*.f64 lambda1 lambda1) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 (*.f64 (pow.f64 lambda1 3) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 1/6 (fma.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3))) (/.f64 lambda2 (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2))))))) (fma.f64 -2 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 lambda2 3) (pow.f64 R 3)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 3)) (*.f64 3 (/.f64 (*.f64 (*.f64 lambda2 (*.f64 R R)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)))) (*.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 2)))))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 lambda2 (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 (fma.f64 (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)))) (neg.f64 (*.f64 (/.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) R))))) (*.f64 -1/6 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 lambda2 3) (pow.f64 R 3)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2))))) 3))))))))))
(exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))
(exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1))))) (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))) lambda1))
(+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda1 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2)))))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))) (pow.f64 lambda1 2)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1))))) (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))) lambda1)))
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (pow.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))))) (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda1 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 1/2 (+.f64 (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))))) (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda1 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2)))))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))) (pow.f64 lambda1 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 3)) (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (/.f64 (*.f64 lambda2 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2))) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (pow.f64 R 3)))) (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 -1 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1)))) 2)) (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))))))) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2))))))))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))) (pow.f64 lambda1 3)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1))))) (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda2) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 1 lambda1)))))) lambda1))))
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (pow.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))))) (+.f64 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda1 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (/.f64 (fma.f64 1/6 (fma.f64 3 (/.f64 lambda2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))) 2)))) (fma.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 -3 (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))) 2)) R) (/.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))))) (fma.f64 1/2 (*.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))))) (*.f64 1/6 (pow.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3)))) (/.f64 (pow.f64 lambda1 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))))
(+.f64 (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 lambda1 lambda1) (*.f64 1/2 (+.f64 (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))))) (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda1 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))) (/.f64 (fma.f64 1/6 (fma.f64 3 (/.f64 lambda2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))) 2)))) (fma.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 -3 (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 (*.f64 1/2 phi1))) 2)) R) (/.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))))) (fma.f64 1/2 (*.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))))) (*.f64 1/6 (pow.f64 (fma.f64 -1 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3)))) (/.f64 (pow.f64 lambda1 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))
(exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda1)))
(fma.f64 -1 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 1/2 (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (pow.f64 lambda1 2)) (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda1))))
(fma.f64 -1 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda1) (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))) (/.f64 (*.f64 lambda1 lambda1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))))
(+.f64 (fma.f64 -1 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (/.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))) (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (/.f64 (*.f64 lambda1 lambda1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/6 (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))))) (*.f64 1/6 (+.f64 (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2)) (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (*.f64 -3 (/.f64 (*.f64 lambda2 (-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) 2))) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))))))) (pow.f64 lambda1 3))) (+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 1/2 (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (pow.f64 lambda1 2)) (*.f64 -1 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 lambda1))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 lambda2 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda1)))))
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (fma.f64 -1 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (pow.f64 lambda1 3) (fma.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (*.f64 1/6 (+.f64 (fma.f64 -3 (/.f64 lambda2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda2) 2)))) (fma.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 -3 (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda2) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (/.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) R))))) (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3)))))) (+.f64 (neg.f64 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda1)) (/.f64 (*.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))) (/.f64 (*.f64 lambda1 lambda1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))))
(fma.f64 -1 (/.f64 (*.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda1) (fma.f64 -1 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (pow.f64 lambda1 3) (fma.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (*.f64 1/6 (+.f64 (fma.f64 -3 (/.f64 lambda2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda2) 2)))) (fma.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 -3 (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda2) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)) (/.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) R))))) (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3)))))) (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))) (pow.f64 (+.f64 lambda2 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (/.f64 (*.f64 lambda1 lambda1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda1)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))))
(+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R))
(+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))
(+.f64 1 (+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)))
(+.f64 1 (fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (pow.f64 lambda1 2))) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 2) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (pow.f64 lambda1 2))) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 2) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R))))))) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) (pow.f64 lambda2 2))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R))))
(fma.f64 (*.f64 1/2 (+.f64 (fma.f64 -1 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))) (*.f64 (*.f64 lambda2 lambda2) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 1 (fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(+.f64 1 (fma.f64 (*.f64 1/2 (+.f64 (fma.f64 -1 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))) (*.f64 (*.f64 lambda2 lambda2) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (pow.f64 lambda1 2))) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 2) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (pow.f64 lambda1 2))) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 2) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R))))))) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) (pow.f64 lambda2 2))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (+.f64 (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R lambda1))) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))) (+.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 R 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (pow.f64 lambda1 3))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) 3))))) (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2)) lambda1))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 2))))))) (+.f64 (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (*.f64 (pow.f64 R 3) (pow.f64 lambda1 3))) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) 3))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (pow.f64 lambda1 2))) (*.f64 (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)) 2) (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R))))) lambda1))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))))))))) (pow.f64 lambda2 3))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2)))) R)))))
(fma.f64 (*.f64 1/2 (+.f64 (fma.f64 -1 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))) (*.f64 (*.f64 lambda2 lambda2) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (+.f64 1 (fma.f64 -1 (*.f64 lambda2 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) (fma.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 (pow.f64 lambda2 3) (fma.f64 1/6 (fma.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (*.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 R)) (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (fma.f64 -2 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (/.f64 (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 3) (*.f64 (pow.f64 R 3) (pow.f64 lambda1 3)))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 3 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 (*.f64 R R) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2)))))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))))) (fma.f64 -1/6 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 6) (/.f64 (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 3) (*.f64 (pow.f64 R 3) (pow.f64 lambda1 3)))) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) 3)))) (*.f64 (*.f64 -1/2 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (*.f64 (*.f64 R (fma.f64 -1 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 4) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))) (/.f64 (*.f64 (*.f64 R R) (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) 2))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))) (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))) 2))))))) lambda1)))) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)))))))) (*.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2))))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))
(exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))
(+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))))) lambda2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda2 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (pow.f64 lambda2 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))
(+.f64 (/.f64 (*.f64 1/2 (+.f64 (pow.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda2 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (pow.f64 lambda2 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3)) (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) lambda1) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))) (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)))) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (*.f64 -3 (/.f64 (*.f64 (+.f64 1 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)))) (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2))) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))))))) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)))) 2) (*.f64 (pow.f64 R 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (pow.f64 lambda2 3)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 lambda1) (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) lambda2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 lambda2))) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))
(+.f64 (/.f64 (*.f64 1/2 (+.f64 (pow.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (+.f64 (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda2 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (/.f64 (fma.f64 1/2 (*.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 1/6 (+.f64 (pow.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (fma.f64 3 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1)) (fma.f64 -3 (*.f64 (/.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) R) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 2 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))))))))) (/.f64 (pow.f64 lambda2 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))))
(+.f64 (+.f64 (/.f64 (*.f64 1/2 (+.f64 (pow.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2) (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2))))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))) (/.f64 lambda2 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (/.f64 (fma.f64 1/2 (*.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))) (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 1/6 (+.f64 (pow.f64 (fma.f64 -1 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (fma.f64 3 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1)) (fma.f64 -3 (*.f64 (/.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) R) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1)) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 2 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R)) 1) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))))))))) (/.f64 (pow.f64 lambda2 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))
(exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))
(exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))) lambda2)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2))))))
(fma.f64 -1 (/.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (/.f64 lambda2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))) lambda2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2)))))) (*.f64 1/2 (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))) (pow.f64 lambda2 2)) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))))
(+.f64 (fma.f64 -1 (/.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (/.f64 lambda2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (/.f64 (*.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))
(+.f64 (fma.f64 -1 (/.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (/.f64 lambda2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (/.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (neg.f64 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))) (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)) lambda1) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))) lambda2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2)))))) (*.f64 1/2 (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 2))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))) (pow.f64 lambda2 2)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))) (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2))) (*.f64 R (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3)))) (+.f64 (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))) 3) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3) (pow.f64 R 3)))) (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 phi1 phi2) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 lambda1 2))) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) lambda1) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 (*.f64 1/6 (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) 3)) (*.f64 1/2 (*.f64 (+.f64 lambda1 (/.f64 1 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 R lambda1))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 R 2))))))))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2)))))) (pow.f64 lambda2 3))) (exp.f64 (+.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (log.f64 (/.f64 -1 lambda2))))))))
(fma.f64 -1 (/.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (/.f64 lambda2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (+.f64 (/.f64 (*.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))) (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (fma.f64 -1 (/.f64 (fma.f64 1/6 (fma.f64 -3 (*.f64 (/.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) R) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (fma.f64 2 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 -3 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))))) (fma.f64 1/6 (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (*.f64 1/2 (*.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))))))) (/.f64 (pow.f64 lambda2 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))))
(fma.f64 -1 (/.f64 (fma.f64 1/6 (fma.f64 2 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 3) (*.f64 (pow.f64 R 3) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (*.f64 -3 (+.f64 (*.f64 (/.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) R) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 3))) (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 lambda1 lambda1) (pow.f64 (-.f64 phi1 phi2) 2)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) lambda1))))) (fma.f64 1/6 (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 3) (*.f64 1/2 (*.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (neg.f64 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R))))))))) (/.f64 (pow.f64 lambda2 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (+.f64 (fma.f64 -1 (/.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) (/.f64 lambda2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R)))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))) (/.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (-.f64 phi1 phi2) 2) (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (neg.f64 (/.f64 (pow.f64 (fma.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) 1) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 R R)))) (pow.f64 (+.f64 lambda1 (/.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))) 2)))) (/.f64 (*.f64 lambda2 lambda2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 lambda2)) (log.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))))))))
(+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))
(+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 (*.f64 phi2 R))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))))
(+.f64 1 (fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 (*.f64 phi2 R))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 1 (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (/.f64 (*.f64 R (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 (*.f64 phi2 R))) (+.f64 1 (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))) R (*.f64 (*.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) (*.f64 phi1 phi1)) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 phi2) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (fma.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (/.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))) (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) R)) (neg.f64 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 phi2) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))))))))))
(+.f64 1 (fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 (*.f64 phi2 R))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))) R (*.f64 (*.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) (*.f64 phi1 phi1)) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 phi2) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (fma.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (/.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))) (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) R)) (neg.f64 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 phi2) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))))))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 phi1 (*.f64 R phi2)))) (+.f64 1 (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R) (+.f64 (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (/.f64 (*.f64 R (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2))))))) (*.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (/.f64 (*.f64 R (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2))) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)))) (*.f64 -1 (/.f64 (*.f64 (pow.f64 R 2) (pow.f64 phi2 2)) (*.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2))))) (*.f64 R phi2)) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (+.f64 (*.f64 1/6 (+.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))) (/.f64 (*.f64 (pow.f64 R 3) (pow.f64 phi2 3)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 3)))) (+.f64 (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))) (/.f64 (*.f64 R (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) phi2)) (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R))))) (*.f64 3 (/.f64 (*.f64 (-.f64 (+.f64 1 (*.f64 -1/4 (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) phi2)) 2)) (*.f64 (pow.f64 R 2) phi2)) (*.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 2))))))) (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 R 3) (pow.f64 phi2 3)) (pow.f64 (+.f64 1 (*.f64 (sqrt.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi2 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) 3))))))) (pow.f64 phi1 3)))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (*.f64 phi1 (*.f64 phi2 R))) (+.f64 1 (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))) R (*.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 phi2) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (fma.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (/.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))) (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) R)) (neg.f64 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 phi2) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))))))) (*.f64 (pow.f64 phi1 3) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))) (/.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))) (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) R)) (neg.f64 (*.f64 (/.f64 (*.f64 R R) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)) (/.f64 (*.f64 phi2 phi2) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) (*.f64 phi2 R)))) (fma.f64 1/6 (fma.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)) 3))) (/.f64 (pow.f64 R 3) (/.f64 (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 3) (pow.f64 phi2 3)))) (*.f64 3 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)) 3))) (/.f64 R (/.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) (*.f64 phi2 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))))))) (*.f64 (/.f64 (+.f64 1 (-.f64 (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) -1/4) (pow.f64 (neg.f64 (*.f64 phi2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)))))) 2))) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))) (/.f64 (*.f64 phi2 (*.f64 R R)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 2)))))) (*.f64 -1/6 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2)) 3))) (/.f64 (pow.f64 R 3) (/.f64 (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi2 phi2))))) 3) (pow.f64 phi2 3)))))))))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))
(exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R)))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (+.f64 (*.f64 -1 phi2) (/.f64 1 R))) phi1))
(+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 phi1 (fma.f64 -1 phi2 (/.f64 1 R)))))
(+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) 2)) (*.f64 1/2 (-.f64 (+.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi2) 2))))) (pow.f64 phi1 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))) phi1) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))))
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 (*.f64 phi1 phi1) (*.f64 1/2 (+.f64 (pow.f64 (fma.f64 -1 phi2 (/.f64 1 R)) 2) (+.f64 (*.f64 phi2 phi2) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 2) (*.f64 R R)))) (pow.f64 (neg.f64 phi2) 2))))))) (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 phi1 (fma.f64 -1 phi2 (/.f64 1 R))))))
(+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 phi1 (fma.f64 -1 phi2 (/.f64 1 R)))) (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 (*.f64 phi1 phi1) (*.f64 1/2 (+.f64 (+.f64 (pow.f64 (fma.f64 -1 phi2 (/.f64 1 R)) 2) (*.f64 phi2 phi2)) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 2) (*.f64 R R)))) (pow.f64 (neg.f64 phi2) 2))))))))
(+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) 2)) (*.f64 1/2 (-.f64 (+.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi2) 2))))) (pow.f64 phi1 2)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))) phi1) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) (+.f64 (*.f64 -1 (*.f64 R phi2)) 1)) R)) (+.f64 (*.f64 3 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi2) 2)) phi2)) (*.f64 2 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 3) (pow.f64 R 3)))))) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 (*.f64 -1 (*.f64 R phi2)) 1) 2) (pow.f64 R 2))))) (pow.f64 (*.f64 -1 phi2) 2)) (+.f64 (*.f64 -1 phi2) (/.f64 1 R)))) (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 phi2) (/.f64 1 R)) 3)))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R)))) (pow.f64 phi1 3)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi1))) (log.f64 R))))))
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 (*.f64 phi1 phi1) (*.f64 1/2 (+.f64 (pow.f64 (fma.f64 -1 phi2 (/.f64 1 R)) 2) (+.f64 (*.f64 phi2 phi2) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 2) (*.f64 R R)))) (pow.f64 (neg.f64 phi2) 2))))))) (+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 phi1 (fma.f64 -1 phi2 (/.f64 1 R)))) (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 (fma.f64 1/6 (fma.f64 -3 (/.f64 (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (neg.f64 phi2) 2))) (/.f64 R (fma.f64 -1 (*.f64 phi2 R) 1))) (fma.f64 3 (*.f64 phi2 (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 2 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 3) (pow.f64 R 3))))) (fma.f64 1/2 (*.f64 (fma.f64 -1 phi2 (/.f64 1 R)) (+.f64 (*.f64 phi2 phi2) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 2) (*.f64 R R)))) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 1/6 (pow.f64 (fma.f64 -1 phi2 (/.f64 1 R)) 3)))) (/.f64 (pow.f64 phi1 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))))))))
(+.f64 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 (*.f64 phi1 phi1) (*.f64 1/2 (+.f64 (+.f64 (pow.f64 (fma.f64 -1 phi2 (/.f64 1 R)) 2) (*.f64 phi2 phi2)) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 2) (*.f64 R R)))) (pow.f64 (neg.f64 phi2) 2)))))) (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (+.f64 (/.f64 (fma.f64 1/6 (fma.f64 -3 (/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (-.f64 (*.f64 phi2 phi2) (pow.f64 (neg.f64 phi2) 2))) (/.f64 R (fma.f64 -1 (*.f64 phi2 R) 1))) (fma.f64 3 (*.f64 phi2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (-.f64 (*.f64 phi2 phi2) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 2 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 3) (pow.f64 R 3))))) (fma.f64 1/2 (*.f64 (fma.f64 -1 phi2 (/.f64 1 R)) (+.f64 (*.f64 phi2 phi2) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi2 R) 1) 2) (*.f64 R R)))) (pow.f64 (neg.f64 phi2) 2)))) (*.f64 1/6 (pow.f64 (fma.f64 -1 phi2 (/.f64 1 R)) 3)))) (/.f64 (pow.f64 phi1 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))))) (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi1)) (log.f64 R))) (/.f64 phi1 (fma.f64 -1 phi2 (/.f64 1 R)))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))
(exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R)))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (/.f64 1 R) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) phi1)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))))
(fma.f64 -1 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))) (/.f64 phi1 (+.f64 phi2 (/.f64 1 R)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (/.f64 1 R) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) phi1)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 R phi2)) 2) (pow.f64 R 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/2 (pow.f64 (+.f64 phi2 (/.f64 1 R)) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) (pow.f64 phi1 2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))))
(fma.f64 -1 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))) (/.f64 phi1 (+.f64 phi2 (/.f64 1 R)))) (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))) (/.f64 (*.f64 1/2 (+.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 R phi2 1) 2) (*.f64 R R)))) (pow.f64 (+.f64 phi2 (/.f64 1 R)) 2))) (/.f64 (*.f64 phi1 phi1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R)))))))
(+.f64 (fma.f64 -1 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))) (/.f64 phi1 (+.f64 phi2 (/.f64 1 R)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R)))) (/.f64 (*.f64 1/2 (+.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 R phi2 1) 2) (*.f64 R R)))) (pow.f64 (+.f64 phi2 (/.f64 1 R)) 2))) (/.f64 (*.f64 phi1 phi1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 phi2 (/.f64 1 R)) 3)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 R phi2)) 2) (pow.f64 R 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (+.f64 phi2 (/.f64 1 R)))) (*.f64 1/6 (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 1 (*.f64 R phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (+.f64 (*.f64 -3 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi2 (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 R phi2)) 3) (pow.f64 R 3)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) (pow.f64 phi1 3))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (/.f64 1 R) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) phi1)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 R phi2)) 2) (pow.f64 R 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 1/2 (pow.f64 (+.f64 phi2 (/.f64 1 R)) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R)))) (pow.f64 phi1 2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi1))) (log.f64 R))))))
(fma.f64 -1 (/.f64 (fma.f64 1/6 (pow.f64 (+.f64 phi2 (/.f64 1 R)) 3) (fma.f64 1/2 (*.f64 (+.f64 phi2 (/.f64 1 R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 R phi2 1) 2) (*.f64 R R))))) (*.f64 1/6 (fma.f64 -3 (/.f64 (fma.f64 R phi2 1) (/.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (fma.f64 -3 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) phi2)) (*.f64 2 (/.f64 (pow.f64 (fma.f64 R phi2 1) 3) (pow.f64 R 3)))))))) (/.f64 (pow.f64 phi1 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))))) (fma.f64 -1 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))) (/.f64 phi1 (+.f64 phi2 (/.f64 1 R)))) (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))) (/.f64 (*.f64 1/2 (+.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 R phi2 1) 2) (*.f64 R R)))) (pow.f64 (+.f64 phi2 (/.f64 1 R)) 2))) (/.f64 (*.f64 phi1 phi1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))))))))
(fma.f64 -1 (/.f64 (fma.f64 1/2 (*.f64 (+.f64 phi2 (/.f64 1 R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 R phi2 1) 2) (*.f64 R R))))) (*.f64 1/6 (+.f64 (fma.f64 -3 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (-.f64 lambda1 lambda2) 2) phi2)) (fma.f64 -3 (/.f64 (fma.f64 R phi2 1) (/.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 2 (/.f64 (pow.f64 (fma.f64 R phi2 1) 3) (pow.f64 R 3))))) (pow.f64 (+.f64 phi2 (/.f64 1 R)) 3)))) (/.f64 (pow.f64 phi1 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))))) (+.f64 (fma.f64 -1 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R))) (/.f64 phi1 (+.f64 phi2 (/.f64 1 R)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R)))) (/.f64 (*.f64 1/2 (+.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (fma.f64 R phi2 1) 2) (*.f64 R R)))) (pow.f64 (+.f64 phi2 (/.f64 1 R)) 2))) (/.f64 (*.f64 phi1 phi1) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi1)) (log.f64 R)))))))
(+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))
(fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1)
(+.f64 1 (+.f64 (*.f64 -1 (*.f64 (*.f64 phi1 (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))
(+.f64 1 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (neg.f64 (*.f64 phi1 (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))))))
(+.f64 (neg.f64 (*.f64 phi1 (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) phi1)) 2)) R) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))) (*.f64 (pow.f64 phi2 2) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (*.f64 phi1 (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))
(fma.f64 (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 R R) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2))) (fma.f64 (/.f64 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (/.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (neg.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 R R) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2))))))) (*.f64 (*.f64 phi2 phi2) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1)) (+.f64 1 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R (neg.f64 (*.f64 phi1 (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))))))
(fma.f64 (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 R R) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2))) (fma.f64 (/.f64 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (/.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (neg.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 R R) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2))))))) (*.f64 (*.f64 phi2 phi2) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1)) (+.f64 (neg.f64 (*.f64 phi1 (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))))) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1)))
(+.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)))) (*.f64 1/2 (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) phi1)) 2)) R) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))) (*.f64 (pow.f64 phi2 2) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (*.f64 phi1 (*.f64 R phi2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))) (*.f64 (pow.f64 phi2 3) (*.f64 (+.f64 (*.f64 1/6 (+.f64 (*.f64 3 (*.f64 (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 phi1 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) 2)) (*.f64 phi1 R)) (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (+.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 phi1 3) (pow.f64 R 3)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 3))))) (*.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)) (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) (/.f64 (*.f64 phi1 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) phi1)) 2)) (pow.f64 R 2))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 phi1 (*.f64 R (+.f64 (*.f64 -1 (/.f64 (*.f64 (pow.f64 phi1 2) (pow.f64 R 2)) (*.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) (/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 -1 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2)))) phi1)) 2)) R) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))) (*.f64 -1/6 (*.f64 (/.f64 (*.f64 (pow.f64 phi1 3) (pow.f64 R 3)) (pow.f64 (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))))) 3)) (sqrt.f64 (/.f64 1 (pow.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) 3))))))) (+.f64 1 (*.f64 R (sqrt.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))))))))))))
(fma.f64 (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 R R) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2))) (fma.f64 (/.f64 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (/.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (neg.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 R R) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2))))))) (*.f64 (*.f64 phi2 phi2) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1)) (+.f64 1 (fma.f64 -1 (*.f64 phi1 (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (fma.f64 R (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (*.f64 (pow.f64 phi2 3) (*.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) (fma.f64 1/6 (fma.f64 3 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (*.f64 (/.f64 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 phi1 R) (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1)))) (fma.f64 -2 (/.f64 (*.f64 (*.f64 (pow.f64 R 3) (pow.f64 phi1 3)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 3)))) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 3)) (*.f64 (*.f64 3 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))))) (/.f64 phi1 (/.f64 (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2) (*.f64 (*.f64 R R) (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)))))))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (/.f64 phi1 (/.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) (*.f64 R (fma.f64 (/.f64 (-.f64 1 (pow.f64 (*.f64 (neg.f64 phi1) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))))) 2)) (/.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) R)) (sqrt.f64 (/.f64 1 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)))) (neg.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (/.f64 (*.f64 R R) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 2))))))))) (*.f64 -1/6 (/.f64 (*.f64 (*.f64 (pow.f64 R 3) (pow.f64 phi1 3)) (sqrt.f64 (/.f64 1 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) 3)))) (pow.f64 (fma.f64 (sqrt.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) R 1) 3)))))))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))
(exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R)))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) phi2) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R))))
(+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))) (/.f64 (fma.f64 -1 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) phi2) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 phi1 R))) 2) (pow.f64 R 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) (pow.f64 (*.f64 -1 phi1) 2))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) (pow.f64 phi2 2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))))
(+.f64 (+.f64 (/.f64 (fma.f64 -1 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))) (/.f64 (*.f64 1/2 (+.f64 (-.f64 (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi1 R) 1) 2) (*.f64 R R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (pow.f64 (neg.f64 phi1) 2)) (pow.f64 (fma.f64 -1 phi1 (/.f64 1 R)) 2))) (/.f64 (*.f64 phi2 phi2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R)))))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))
(+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))) (+.f64 (/.f64 (fma.f64 -1 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))) (/.f64 (*.f64 1/2 (+.f64 (-.f64 (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi1 R) 1) 2) (*.f64 R R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (pow.f64 (neg.f64 phi1) 2)) (pow.f64 (fma.f64 -1 phi1 (/.f64 1 R)) 2))) (/.f64 (*.f64 phi2 phi2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R)))))))
(+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) phi2) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) 3)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 phi1 R))) 2) (pow.f64 R 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) (pow.f64 (*.f64 -1 phi1) 2)) (+.f64 (*.f64 -1 phi1) (/.f64 1 R)))) (*.f64 1/6 (+.f64 (*.f64 3 (*.f64 phi1 (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2)))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 phi1 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (pow.f64 (*.f64 -1 phi1) 2)) (+.f64 1 (*.f64 -1 (*.f64 phi1 R)))) R)) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 phi1 R))) 3) (pow.f64 R 3)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) (pow.f64 phi2 3)) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (-.f64 (+.f64 (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 -1 (*.f64 phi1 R))) 2) (pow.f64 R 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (pow.f64 phi1 2))) (pow.f64 (*.f64 -1 phi1) 2))) (*.f64 1/2 (pow.f64 (+.f64 (*.f64 -1 phi1) (/.f64 1 R)) 2))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R)))) (pow.f64 phi2 2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 phi2))) (log.f64 R))))))
(+.f64 (/.f64 (fma.f64 -1 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))) (+.f64 (/.f64 (fma.f64 1/6 (pow.f64 (fma.f64 -1 phi1 (/.f64 1 R)) 3) (fma.f64 1/2 (*.f64 (fma.f64 -1 phi1 (/.f64 1 R)) (-.f64 (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi1 R) 1) 2) (*.f64 R R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (pow.f64 (neg.f64 phi1) 2))) (*.f64 1/6 (fma.f64 3 (*.f64 phi1 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2))) (fma.f64 -3 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2)) (/.f64 R (fma.f64 -1 (*.f64 phi1 R) 1))) (/.f64 (*.f64 2 (pow.f64 (fma.f64 -1 (*.f64 phi1 R) 1) 3)) (pow.f64 R 3))))))) (/.f64 (pow.f64 phi2 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))) (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))) (/.f64 (*.f64 1/2 (+.f64 (-.f64 (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi1 R) 1) 2) (*.f64 R R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (pow.f64 (neg.f64 phi1) 2)) (pow.f64 (fma.f64 -1 phi1 (/.f64 1 R)) 2))) (/.f64 (*.f64 phi2 phi2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))))))
(+.f64 (/.f64 (fma.f64 -1 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))) (+.f64 (/.f64 (*.f64 1/2 (+.f64 (-.f64 (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi1 R) 1) 2) (*.f64 R R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (pow.f64 (neg.f64 phi1) 2)) (pow.f64 (fma.f64 -1 phi1 (/.f64 1 R)) 2))) (/.f64 (*.f64 phi2 phi2) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))) (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))) (/.f64 (fma.f64 1/6 (pow.f64 (fma.f64 -1 phi1 (/.f64 1 R)) 3) (fma.f64 1/2 (*.f64 (fma.f64 -1 phi1 (/.f64 1 R)) (-.f64 (fma.f64 -1 (/.f64 (pow.f64 (fma.f64 -1 (*.f64 phi1 R) 1) 2) (*.f64 R R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1))) (pow.f64 (neg.f64 phi1) 2))) (*.f64 1/6 (fma.f64 3 (*.f64 phi1 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2))) (fma.f64 -3 (/.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (*.f64 phi1 phi1)) (pow.f64 (neg.f64 phi1) 2)) (/.f64 R (fma.f64 -1 (*.f64 phi1 R) 1))) (/.f64 (*.f64 2 (pow.f64 (fma.f64 -1 (*.f64 phi1 R) 1) 3)) (pow.f64 R 3))))))) (/.f64 (pow.f64 phi2 3) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 phi2)) (log.f64 R))))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))
(exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R)))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 phi1 (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) phi2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))))
(fma.f64 -1 (/.f64 (+.f64 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R))))
(+.f64 (/.f64 (*.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))) (+.f64 (*.f64 1/2 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2)) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (pow.f64 R 2))))))) (pow.f64 phi2 2)) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 phi1 (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) phi2)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))))
(+.f64 (fma.f64 -1 (/.f64 (+.f64 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R)))) (/.f64 (*.f64 1/2 (+.f64 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (*.f64 R R)))))) (/.f64 (*.f64 phi2 phi2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 phi1 (/.f64 1 R)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) phi2)) (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (+.f64 (*.f64 1/6 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 3)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 phi1 (/.f64 1 R)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (pow.f64 R 2)))))) (*.f64 1/6 (+.f64 (*.f64 -3 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (+.f64 (*.f64 -3 (/.f64 (*.f64 (+.f64 1 (*.f64 phi1 R)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) R)) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 3) (pow.f64 R 3)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) (pow.f64 phi2 3))) (/.f64 (*.f64 (+.f64 (*.f64 1/2 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2)) (*.f64 1/2 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 -1 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (pow.f64 R 2)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 phi2))) (log.f64 R)))) (pow.f64 phi2 2)))))
(+.f64 (fma.f64 -1 (/.f64 (+.f64 phi1 (/.f64 1 R)) (/.f64 phi2 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R))))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R)))) (fma.f64 -1 (/.f64 (fma.f64 1/6 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 3) (fma.f64 1/2 (*.f64 (+.f64 phi1 (/.f64 1 R)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (*.f64 R R))))) (*.f64 1/6 (fma.f64 -3 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2))) (fma.f64 -3 (/.f64 (+.f64 1 (*.f64 phi1 R)) (/.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2)))) (*.f64 2 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 3) (pow.f64 R 3)))))))) (/.f64 (pow.f64 phi2 3) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R))))) (/.f64 (*.f64 1/2 (+.f64 (pow.f64 (+.f64 phi1 (/.f64 1 R)) 2) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2) (pow.f64 (-.f64 lambda1 lambda2) 2) (neg.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 phi1 R)) 2) (*.f64 R R)))))) (/.f64 (*.f64 phi2 phi2) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 phi2)) (log.f64 R)))))))
(+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 0)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(+.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) -1)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(+.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) -1))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(+.f64 1 (-.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(+.f64 0 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(+.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) -2)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(+.f64 -1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(+.f64 (+.f64 -1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 1)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) R)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (sqrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) (*.f64 (sqrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) R))
(*.f64 R (*.f64 (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (sqrt.f64 R) (*.f64 (sqrt.f64 R) (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(*.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) (*.f64 (sqrt.f64 R) (sqrt.f64 R)))
(*.f64 (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (*.f64 (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) R))
(*.f64 (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2) (*.f64 R (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (pow.f64 (cbrt.f64 R) 2) (*.f64 (cbrt.f64 R) (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(*.f64 (*.f64 (pow.f64 (cbrt.f64 R) 2) (cbrt.f64 R)) (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1) (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)) (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2))
(*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)) (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))
(*.f64 (*.f64 R (sqrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (sqrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(*.f64 R (*.f64 (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (sqrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 (*.f64 R (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(*.f64 R (*.f64 (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2) (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(*.f64 (*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) (sqrt.f64 R)) (sqrt.f64 R))
(*.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) (*.f64 (sqrt.f64 R) (sqrt.f64 R)))
(*.f64 (*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) (pow.f64 (cbrt.f64 R) 2)) (cbrt.f64 R))
(*.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cbrt.f64 R) 2) (cbrt.f64 R)))
(*.f64 (+.f64 1 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))) (-.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 1))
(*.f64 (+.f64 1 (sqrt.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1))) (+.f64 (sqrt.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)) -1))
(/.f64 1 (/.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)) (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2))
(/.f64 1 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)) (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)) (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)) (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (-.f64 1 (*.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) -1))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)) (+.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2) (-.f64 1 (*.f64 -1 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)) (+.f64 1 (-.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2) (*.f64 -1 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)) (neg.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)) 1) (neg.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2)))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)) (-.f64 -2 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(/.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3))) (neg.f64 (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)) (-.f64 (-.f64 -2 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))
(/.f64 (*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) 1) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)) (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))
(/.f64 (*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) 1) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (-.f64 1 (*.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) -1))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)) (+.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2) (-.f64 1 (*.f64 -1 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)) (+.f64 1 (-.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2) (*.f64 -1 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1) 1) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)) (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2))
(/.f64 (*.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1))) (neg.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)) 1) (neg.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2)))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)) (-.f64 -2 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(/.f64 (*.f64 1 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)))) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3))) (neg.f64 (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)) (-.f64 (-.f64 -2 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))
(/.f64 (*.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (/.f64 (sqrt.f64 (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1))) (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (/.f64 (sqrt.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2)) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3))) (/.f64 (cbrt.f64 (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1))) (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (/.f64 (cbrt.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2)) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))))
(/.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)) 1) (neg.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)) 1) (neg.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2)))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)) (-.f64 -2 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(/.f64 (*.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3))) (neg.f64 (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)) (-.f64 (-.f64 -2 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))
(/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (/.f64 (sqrt.f64 (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)) (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) (/.f64 (sqrt.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2)) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3))) (/.f64 (cbrt.f64 (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2))) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2)))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) -1)) (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2)) (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(/.f64 (pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 2) (/.f64 (cbrt.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2)) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))))
(/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2)) 1) (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (+.f64 1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2)))
(/.f64 (+.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 4) -1) (/.f64 (+.f64 1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)) (/.f64 1 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2))))
(/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) 3) 1) (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2)) (+.f64 1 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) 1))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2) 3) -1) (/.f64 (+.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 4) (+.f64 1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2))) (/.f64 1 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2) 3) -1) (/.f64 (+.f64 1 (+.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 4))) (/.f64 1 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2))))
(/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) (+.f64 1 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)))
(/.f64 (+.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 6) -1) (/.f64 (+.f64 1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3)) (/.f64 1 (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) 3) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) (+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3)) (+.f64 1 (*.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) 1))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3) 3) -1) (/.f64 (+.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 6) (+.f64 1 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3))) (/.f64 1 (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3) 3) -1) (/.f64 (+.f64 1 (+.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 6))) (/.f64 1 (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))))
(pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(pow.f64 (sqrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 2)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 3)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3) 1/3)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))
(sqrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2))
(log.f64 (pow.f64 (exp.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) R))
(*.f64 R (log.f64 (exp.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(cbrt.f64 (*.f64 (pow.f64 R 3) (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) 3)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(cbrt.f64 (*.f64 (pow.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)) 3) (pow.f64 R 3)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(expm1.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(exp.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(exp.f64 (*.f64 (log.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 1))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(log1p.f64 (expm1.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(fma.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) -1)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(fma.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) -1)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(fma.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) -1)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(+.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 0)
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(+.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(+.f64 0 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(+.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) -1)
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(+.f64 -1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(-.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 0)
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(-.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) 1)
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (-.f64 (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) 1))
(+.f64 (-.f64 (/.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2) (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2)) (/.f64 1 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2))) 1)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (-.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) 1))
(+.f64 (-.f64 (/.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3) (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2))) (/.f64 1 (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))) 1)
(-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (/.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(+.f64 1 (-.f64 (/.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2) (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2)) (/.f64 1 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2))))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2) (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))))
(+.f64 1 (-.f64 (/.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 3) (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2))) (/.f64 1 (+.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2) (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2)))))
(*.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 1)
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(*.f64 1 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(*.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(*.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) (*.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 1))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(*.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) (pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2) (*.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 1))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(/.f64 (-.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (-.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(/.f64 (-.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2)) (-.f64 1 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3)) (+.f64 1 (-.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3)) (-.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2)) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3)) (-.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2) (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) -1)))
(/.f64 (*.f64 1 (-.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2))) (-.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(/.f64 (-.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2)) (-.f64 1 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(/.f64 (*.f64 1 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3))) (+.f64 1 (-.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3)) (-.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2)) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3)) (-.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2) (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) -1)))
(/.f64 (*.f64 (-.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) 1) (-.f64 1 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(/.f64 (-.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2)) (-.f64 1 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3)) (-.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2)) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3)) (-.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 2) (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) -1)))
(pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 1)
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(pow.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2)
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(pow.f64 (cbrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 3)
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(pow.f64 (E.f64) (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))
(pow.f64 (E.f64) (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))
(pow.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3) 1/3)
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) (sqrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))))) (sqrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))))))
(sqrt.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 2))
(sqrt.f64 (pow.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1) 2))
(log.f64 (exp.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(log.f64 (+.f64 1 (expm1.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1))))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(cbrt.f64 (pow.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 3))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)
(expm1.f64 (log.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)))
(expm1.f64 (log.f64 (fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 2)))
(log1p.f64 (expm1.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)))
(fma.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) 1)

eval4.4s (15.7%)

Compiler

Compiled 111533 to 72174 computations (35.3% saved)

prune894.0ms (3.2%)

Pruning

66 alts after pruning (63 fresh and 3 done)

PrunedKeptTotal
New1827241851
Fresh83947
Picked101
Done437
Total1840661906
Accurracy
98.6%
Counts
1906 → 66
Alt Table
Click to see full alt table
StatusAccuracyProgram
33.1%
(fma.f64 phi2 R (-.f64 (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))) 2)) phi1) (*.f64 phi1 R)))
40.8%
(pow.f64 (pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) 2) 3)
6.9%
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 3) 1/3)
40.8%
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/3) 3)
90.7%
(pow.f64 (*.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (cbrt.f64 R)) 3)
13.7%
(pow.f64 (sqrt.f64 (*.f64 R (+.f64 phi1 phi2))) 2)
84.8%
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 3)
80.3%
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 phi2 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
15.6%
(/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
10.0%
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2))
30.3%
(-.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2) 1)
26.6%
(-.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) (sqrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) 1)
59.6%
(-.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 1)
39.4%
(-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
10.0%
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
14.1%
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))))
8.9%
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda2 (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R) (*.f64 phi1 -1/2)) (*.f64 (fma.f64 -1/8 (*.f64 phi1 phi1) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) R)))))
10.6%
(-.f64 (exp.f64 (log1p.f64 (*.f64 phi2 R))) 1)
18.9%
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)))) 1)
4.1%
(-.f64 1 1)
25.6%
(+.f64 (*.f64 R phi2) (*.f64 R phi1))
49.8%
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
6.7%
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) (neg.f64 R))
22.5%
(*.f64 (*.f64 lambda2 R) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (sin.f64 (*.f64 1/2 phi2))))))
22.5%
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1)))))
20.2%
(*.f64 (*.f64 lambda2 R) (-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1))
20.1%
(*.f64 (*.f64 lambda2 R) (*.f64 2 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
26.0%
(*.f64 (*.f64 lambda2 R) (sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))
21.9%
(*.f64 (*.f64 lambda2 R) (log.f64 (+.f64 1 (fabs.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
19.5%
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 phi1)))
23.3%
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
85.1%
(*.f64 (*.f64 R (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
9.3%
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
27.0%
(*.f64 (neg.f64 phi1) R)
6.7%
(*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
5.1%
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))
21.4%
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 lambda1 R)))
26.5%
(*.f64 phi2 R)
17.3%
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))
19.5%
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
7.9%
(*.f64 lambda1 (pow.f64 (cbrt.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3))
7.1%
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
9.8%
(*.f64 lambda1 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))))
6.7%
(*.f64 lambda1 (*.f64 R (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))
3.8%
(*.f64 lambda1 (exp.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
92.5%
(*.f64 R (hypot.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2) 2) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
92.2%
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) 3)) (-.f64 phi1 phi2)))
92.8%
(*.f64 R (hypot.f64 (/.f64 1 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (-.f64 phi1 phi2)))
76.0%
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
54.1%
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
92.6%
(*.f64 R (hypot.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (*.f64 (-.f64 lambda1 lambda2) -1)) (-.f64 phi1 phi2)))
62.3%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (-.f64 phi1 phi2)))
56.7%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (cos.f64 (*.f64 1/2 phi2))))) (-.f64 phi1 phi2)))
69.1%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))) (-.f64 phi1 phi2)))
81.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2)))))) (-.f64 phi1 phi2)))
81.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi2))) (-.f64 phi1 phi2)))
86.7%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
67.1%
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (-.f64 phi1 phi2)))
69.3%
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2)))
39.4%
(*.f64 R (hypot.f64 (expm1.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))) (-.f64 phi1 phi2)))
49.8%
(*.f64 R (-.f64 phi2 phi1))
25.6%
(*.f64 R (+.f64 phi2 phi1))
5.1%
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))
7.1%
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
20.2%
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
38.9%
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3))
Compiler

Compiled 1356 to 986 computations (27.3% saved)

regimes589.0ms (2.1%)

Counts
104 → 1
Calls
Call 1
Inputs
(*.f64 phi2 R)
(-.f64 1 1)
(*.f64 (neg.f64 phi1) R)
(*.f64 R (+.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
(+.f64 (*.f64 R phi2) (*.f64 R phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2))
(/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 lambda1 R)))
(*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) (neg.f64 R))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
(-.f64 (exp.f64 (log1p.f64 (*.f64 phi2 R))) 1)
(pow.f64 (sqrt.f64 (*.f64 R (+.f64 phi1 phi2))) 2)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (*.f64 lambda2 R) (sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi2))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2)) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
(*.f64 lambda1 (*.f64 R (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
(-.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1) 1)
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1)) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 R (hypot.f64 (/.f64 1 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) (-.f64 phi1 phi2)))
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(-.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 R (hypot.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2) 2) (/.f64 1 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 1)) (*.f64 (-.f64 lambda1 lambda2) -1)) (-.f64 phi1 phi2)))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)))) 1)
(*.f64 lambda1 (exp.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 (*.f64 lambda2 R) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 lambda1 (pow.f64 (cbrt.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3))
(*.f64 (*.f64 lambda2 R) (pow.f64 (sqrt.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(*.f64 (*.f64 lambda2 R) (log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))
(*.f64 (*.f64 lambda2 R) (-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 1))
(pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 lambda2 R)) 3) 1/3)
(*.f64 R (hypot.f64 (pow.f64 (/.f64 (/.f64 1 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) -1) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (*.f64 -1/2 phi2) (sin.f64 (*.f64 1/2 phi1))))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (*.f64 -1/2 phi1) (sin.f64 (*.f64 1/2 phi2))))) (-.f64 phi1 phi2)))
(fma.f64 phi2 R (-.f64 (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)) phi1) (*.f64 phi1 R)))
(-.f64 (*.f64 lambda1 (*.f64 R (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 phi1)) (*.f64 (+.f64 (*.f64 -1/8 (*.f64 phi1 phi1)) 1) (cos.f64 (*.f64 1/2 phi2))))) (-.f64 phi1 phi2)))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda2 R) (log.f64 (+.f64 1 (fabs.f64 (expm1.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))))))))
(*.f64 (*.f64 lambda2 R) (*.f64 2 (log.f64 (sqrt.f64 (exp.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))
(*.f64 R (hypot.f64 (expm1.f64 (log1p.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 1/2 phi1))))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/2 phi2))))) (-.f64 phi1 phi2)))
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 3))
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 phi2 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))) 3)
(*.f64 R (hypot.f64 (expm1.f64 (log1p.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi1)))))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log.f64 (+.f64 1 (cos.f64 (*.f64 1/2 phi2)))))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))))) (-.f64 phi1 phi2)))
(-.f64 (exp.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))) 1)
(cbrt.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 3)) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (sqrt.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2))) 2)) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2))) 3) (-.f64 phi1 phi2)))
(pow.f64 (cbrt.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))) 3)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)))) 1)) (-.f64 phi1 phi2)))
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/3) 3)
(pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 3) 1/3)
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (pow.f64 (/.f64 1 (cbrt.f64 (-.f64 lambda1 lambda2))) 3)) (-.f64 phi1 phi2)))
(-.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 1)) 2) 1)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (log1p.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) 2) 2)))) (-.f64 phi1 phi2)))
(*.f64 lambda1 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))))
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1)))))
(-.f64 (*.f64 lambda1 (exp.f64 (log.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(-.f64 (*.f64 lambda1 (pow.f64 (cbrt.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 3)) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 lambda2 (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) R) (*.f64 phi1 -1/2)) (*.f64 (fma.f64 -1/8 (*.f64 phi1 phi1) 1) (*.f64 (cos.f64 (*.f64 1/2 phi2)) R)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (fabs.f64 (log1p.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (-.f64 phi1 phi2)))
(pow.f64 (*.f64 (cbrt.f64 (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (cbrt.f64 R)) 3)
(pow.f64 (pow.f64 (pow.f64 (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) 1/2)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) 1/6) 2) 3)
(*.f64 (*.f64 lambda2 R) (fma.f64 (cos.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (sin.f64 (*.f64 1/2 phi2))))))
(-.f64 (*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))))
(-.f64 (*.f64 lambda1 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1)))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(fma.f64 phi2 R (-.f64 (/.f64 (*.f64 (*.f64 -1/2 R) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))))) 2)) phi1) (*.f64 phi1 R)))
(*.f64 (*.f64 R (pow.f64 (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) 2)) (cbrt.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))))
(-.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) (sqrt.f64 (log1p.f64 (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))))) 1)
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (expm1.f64 (fma.f64 -1/2 (/.f64 (sin.f64 (*.f64 1/2 phi2)) (/.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1) phi1)) (fma.f64 1/2 (*.f64 -1/4 (*.f64 (+.f64 (*.f64 (tan.f64 (/.f64 phi2 4)) (tan.f64 (/.f64 phi2 4))) (/.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 (cos.f64 (*.f64 1/2 phi2)) 1))) (*.f64 phi1 phi1))) (log1p.f64 (cos.f64 (*.f64 1/2 phi2))))))) (-.f64 phi1 phi2)))
Outputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
Calls

9 calls:

72.0ms
phi2
71.0ms
R
66.0ms
lambda1
64.0ms
(-.f64 lambda1 lambda2)
63.0ms
lambda2
Results
AccuracySegmentsBranch
92.9%1R
92.9%1lambda1
92.9%1lambda2
92.9%1phi1
92.9%1phi2
92.9%1(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
92.9%1(sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
92.9%1(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
92.9%1(-.f64 lambda1 lambda2)
Compiler

Compiled 1894 to 1031 computations (45.6% saved)

regimes283.0ms (1%)

Counts
39 → 2
Calls
Call 1
Inputs
(*.f64 phi2 R)
(-.f64 1 1)
(*.f64 (neg.f64 phi1) R)
(*.f64 R (+.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
(+.f64 (*.f64 R phi2) (*.f64 R phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2))
(/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 lambda1 R)))
(*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) (neg.f64 R))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
(-.f64 (exp.f64 (log1p.f64 (*.f64 phi2 R))) 1)
(pow.f64 (sqrt.f64 (*.f64 R (+.f64 phi1 phi2))) 2)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (*.f64 lambda2 R) (sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi2))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (neg.f64 lambda2)) (-.f64 phi1 phi2)))
Outputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi2))) (-.f64 phi1 phi2)))
Calls

6 calls:

77.0ms
lambda2
48.0ms
lambda1
47.0ms
phi1
46.0ms
phi2
25.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
86.7%1R
88.9%2lambda1
88.3%3lambda2
92.8%2phi1
92.7%2phi2
86.7%1(-.f64 lambda1 lambda2)
Compiler

Compiled 404 to 213 computations (47.3% saved)

bsearch37.0ms (0.1%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
37.0ms
-1.5327757235043415e-5
-2.655782558184376e-6
Results
26.0ms84×body256valid
6.0msbody1024valid
2.0msbody512valid
Compiler

Compiled 285 to 196 computations (31.2% saved)

regimes162.0ms (0.6%)

Counts
37 → 1
Calls
Call 1
Inputs
(*.f64 phi2 R)
(-.f64 1 1)
(*.f64 (neg.f64 phi1) R)
(*.f64 R (+.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
(+.f64 (*.f64 R phi2) (*.f64 R phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2))
(/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 lambda1 R)))
(*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) (neg.f64 R))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
(-.f64 (exp.f64 (log1p.f64 (*.f64 phi2 R))) 1)
(pow.f64 (sqrt.f64 (*.f64 R (+.f64 phi1 phi2))) 2)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (*.f64 lambda2 R) (sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
Outputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
Calls

6 calls:

31.0ms
lambda2
26.0ms
(-.f64 lambda1 lambda2)
25.0ms
R
22.0ms
lambda1
22.0ms
phi1
Results
AccuracySegmentsBranch
86.7%1R
86.7%1lambda1
86.7%1lambda2
86.7%1phi1
86.7%1phi2
86.7%1(-.f64 lambda1 lambda2)
Compiler

Compiled 375 to 201 computations (46.4% saved)

regimes347.0ms (1.2%)

Counts
36 → 5
Calls
Call 1
Inputs
(*.f64 phi2 R)
(-.f64 1 1)
(*.f64 (neg.f64 phi1) R)
(*.f64 R (+.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
(+.f64 (*.f64 R phi2) (*.f64 R phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2))
(/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 lambda1 R)))
(*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) (neg.f64 R))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
(-.f64 (exp.f64 (log1p.f64 (*.f64 phi2 R))) 1)
(pow.f64 (sqrt.f64 (*.f64 R (+.f64 phi1 phi2))) 2)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (*.f64 lambda2 R) (sqrt.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 phi2 phi1))))))
Outputs
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
Calls

6 calls:

106.0ms
phi1
62.0ms
phi2
60.0ms
lambda1
43.0ms
(-.f64 lambda1 lambda2)
42.0ms
lambda2
Results
AccuracySegmentsBranch
76.0%1R
83.5%3lambda1
82.6%2lambda2
83.9%5phi1
77.8%3phi2
77.9%2(-.f64 lambda1 lambda2)
Compiler

Compiled 361 to 195 computations (46% saved)

bsearch226.0ms (0.8%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
44.0ms
-423.3438421702068
-0.004990330898086676
48.0ms
-2.5339268741328946e+61
-7.325710996100356e+59
66.0ms
-2.834097650139778e+115
-1.8249398164295443e+110
68.0ms
-1.1413004018979966e+199
-1.6239871277943047e+194
Results
95.0ms379×body256valid
57.0ms73×body1024valid
46.0ms92×body512valid
16.0ms25×body256infinite
Compiler

Compiled 1276 to 919 computations (28% saved)

regimes212.0ms (0.8%)

Counts
34 → 2
Calls
Call 1
Inputs
(*.f64 phi2 R)
(-.f64 1 1)
(*.f64 (neg.f64 phi1) R)
(*.f64 R (+.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
(+.f64 (*.f64 R phi2) (*.f64 R phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2))
(/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 lambda1 R)))
(*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) (neg.f64 R))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
(-.f64 (exp.f64 (log1p.f64 (*.f64 phi2 R))) 1)
(pow.f64 (sqrt.f64 (*.f64 R (+.f64 phi1 phi2))) 2)
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2)))
Outputs
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
Calls

6 calls:

51.0ms
phi2
35.0ms
phi1
35.0ms
lambda1
32.0ms
(-.f64 lambda1 lambda2)
32.0ms
lambda2
Results
AccuracySegmentsBranch
76.0%1R
80.3%2lambda1
79.4%2lambda2
79.9%2phi1
77.8%3phi2
77.9%2(-.f64 lambda1 lambda2)
Compiler

Compiled 335 to 182 computations (45.7% saved)

bsearch42.0ms (0.2%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
42.0ms
-3.064120443854209e+182
-3.296168865486974e+180
Results
16.0ms70×body256valid
12.0ms23×body512valid
11.0ms19×body1024valid
1.0msbody256infinite
Compiler

Compiled 276 to 189 computations (31.5% saved)

regimes158.0ms (0.6%)

Counts
33 → 2
Calls
Call 1
Inputs
(*.f64 phi2 R)
(-.f64 1 1)
(*.f64 (neg.f64 phi1) R)
(*.f64 R (+.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
(+.f64 (*.f64 R phi2) (*.f64 R phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2))
(/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 lambda1 R)))
(*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) (neg.f64 R))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
(-.f64 (exp.f64 (log1p.f64 (*.f64 phi2 R))) 1)
(pow.f64 (sqrt.f64 (*.f64 R (+.f64 phi1 phi2))) 2)
Outputs
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
Calls

6 calls:

48.0ms
lambda1
30.0ms
phi1
21.0ms
(-.f64 lambda1 lambda2)
18.0ms
phi2
16.0ms
lambda2
Results
AccuracySegmentsBranch
76.0%1R
78.1%2lambda1
76.0%1lambda2
76.0%1phi1
76.0%1phi2
76.0%1(-.f64 lambda1 lambda2)
Compiler

Compiled 323 to 176 computations (45.5% saved)

bsearch97.0ms (0.3%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
97.0ms
-6.88906912053355e+284
-9.417207842715241e+274
Results
47.0ms72×body1024valid
18.0ms63×body256valid
11.0ms25×body512valid
7.0ms36×body256infinite
6.0ms13×body512infinite
6.0ms10×body1024infinite
Compiler

Compiled 365 to 258 computations (29.3% saved)

regimes130.0ms (0.5%)

Counts
30 → 1
Calls
Call 1
Inputs
(*.f64 phi2 R)
(-.f64 1 1)
(*.f64 (neg.f64 phi1) R)
(*.f64 R (+.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
(+.f64 (*.f64 R phi2) (*.f64 R phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2))
(/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 phi1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 lambda1 R)))
(*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 phi1))) (neg.f64 R))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) R)
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 (*.f64 R (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 lambda2))
Outputs
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
Calls

6 calls:

44.0ms
(-.f64 lambda1 lambda2)
18.0ms
lambda2
16.0ms
R
15.0ms
phi1
15.0ms
phi2
Results
AccuracySegmentsBranch
76.0%1R
76.0%1lambda1
76.0%1lambda2
76.0%1phi1
76.0%1phi2
76.0%1(-.f64 lambda1 lambda2)
Compiler

Compiled 297 to 163 computations (45.1% saved)

regimes274.0ms (1%)

Counts
20 → 2
Calls
Call 1
Inputs
(*.f64 phi2 R)
(-.f64 1 1)
(*.f64 (neg.f64 phi1) R)
(*.f64 R (+.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
(+.f64 (*.f64 R phi2) (*.f64 R phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2))
(/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 1/2 phi2)) lambda1))
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 1/2 phi1))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) R))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 1/2 phi2)) R))
(*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 lambda1 R))
(*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 R lambda1))
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 1/2 phi1)))
Outputs
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
Calls

6 calls:

67.0ms
phi2
60.0ms
R
41.0ms
(-.f64 lambda1 lambda2)
40.0ms
lambda1
32.0ms
lambda2
Results
AccuracySegmentsBranch
60.8%6R
62.0%3lambda1
60.7%3lambda2
70.3%2phi1
63.8%5phi2
64.5%4(-.f64 lambda1 lambda2)
Compiler

Compiled 200 to 114 computations (43% saved)

bsearch40.0ms (0.1%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
40.0ms
-744385458895866100.0
-7957616218024212.0
Results
33.0ms100×body256valid
5.0msbody1024valid
1.0msbody512valid
Compiler

Compiled 213 to 147 computations (31% saved)

regimes38.0ms (0.1%)

Counts
10 → 1
Calls
Call 1
Inputs
(*.f64 phi2 R)
(-.f64 1 1)
(*.f64 (neg.f64 phi1) R)
(*.f64 R (+.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 R (+.f64 (neg.f64 phi1) phi2))
(+.f64 (*.f64 R phi2) (*.f64 R phi1))
(+.f64 (*.f64 R phi2) (*.f64 -1 (*.f64 phi1 R)))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) R) (-.f64 phi1 phi2))
(/.f64 (-.f64 (*.f64 (*.f64 R phi1) (*.f64 R phi1)) (*.f64 (*.f64 R phi2) (*.f64 R phi2))) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
Outputs
(*.f64 R (-.f64 phi2 phi1))
Calls

5 calls:

9.0ms
lambda1
7.0ms
phi2
7.0ms
phi1
6.0ms
lambda2
6.0ms
R
Results
AccuracySegmentsBranch
49.8%1R
49.8%1lambda1
49.8%1lambda2
49.8%1phi1
49.8%1phi2
Compiler

Compiled 113 to 60 computations (46.9% saved)

regimes97.0ms (0.3%)

Counts
4 → 2
Calls
Call 1
Inputs
(*.f64 phi2 R)
(-.f64 1 1)
(*.f64 (neg.f64 phi1) R)
(*.f64 R (+.f64 phi2 phi1))
Outputs
(*.f64 (neg.f64 phi1) R)
(*.f64 phi2 R)
Calls

5 calls:

31.0ms
lambda2
27.0ms
R
22.0ms
lambda1
8.0ms
phi1
7.0ms
phi2
Results
AccuracySegmentsBranch
34.2%6R
34.1%5lambda1
34.1%7lambda2
41.7%2phi1
43.2%2phi2
Compiler

Compiled 50 to 38 computations (24% saved)

bsearch75.0ms (0.3%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
75.0ms
3.151614373971445e+65
7.078533860296678e+73
Results
47.0ms87×body256valid
18.0ms44×body512valid
7.0ms13×body1024valid
1.0msbody256infinite
Compiler

Compiled 216 to 163 computations (24.5% saved)

regimes69.0ms (0.2%)

Accuracy

Total -14.4b remaining (-30.7%)

Threshold costs -14.4b (-30.7%)

Counts
2 → 1
Calls
Call 1
Inputs
(*.f64 phi2 R)
(-.f64 1 1)
Outputs
(*.f64 phi2 R)
Calls

5 calls:

56.0ms
phi2
3.0ms
lambda1
3.0ms
phi1
3.0ms
R
3.0ms
lambda2
Results
AccuracySegmentsBranch
26.5%1R
26.5%1lambda1
26.5%1lambda2
26.5%1phi1
26.5%1phi2
Compiler

Compiled 41 to 34 computations (17.1% saved)

simplify21.0ms (0.1%)

Algorithm
egg-herbie
Rules
74×*-commutative
30×+-commutative
22×neg-mul-1
22×neg-sub0
20×sub-neg
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
080637
1119637
2144637
3168637
4180637
5186637
6188637
Stop Event
fuel
saturated
Calls
Call 1
Inputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
(if (<=.f64 phi1 -5548780617371833/1180591620717411303424) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi2))) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
(if (<=.f64 phi1 -3349999999999999774087296220928874860199250799129965329134612119705572927521376381038467771679111780416512541130434401673859365669423247450105705404125982469609950278645642069342647189284101029888) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2))) (if (<=.f64 phi1 -185000000000000006029072861934708331022274275030485734212396727855767085187366176641796392660728589103967240192) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (-.f64 phi1 phi2))) (if (<=.f64 phi1 -18500000000000000134097772525339259832541909790869438639112192) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2))) (if (<=.f64 phi1 -8762203435012037/576460752303423488) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))))))
(if (<=.f64 lambda1 -3399999999999999847169547443142110871605457886817841554782778755707076827600654269467879385080364333954771879135389854227798413944125781943460599622220944361391031088765004664537088) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(if (<=.f64 lambda1 -170000000000000015117365436236758906864721090453065254165660782059733835675656290421681654237014985558132601465529222876949109316224115689533265450891382110558957613093222376818629321516775877811102998836502883412559325051077912565489725529364065481564275036923250460797792876582928384) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(if (<=.f64 phi1 -23000000000000000) (*.f64 R (-.f64 phi2 phi1)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)))
(*.f64 R (-.f64 phi2 phi1))
(if (<=.f64 phi2 1300000000000000059869580733570580134472701552406580863237149949952) (*.f64 (neg.f64 phi1) R) (*.f64 phi2 R))
(*.f64 phi2 R)
Outputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) 2))) (-.f64 phi1 phi2)))
(if (<=.f64 phi1 -5548780617371833/1180591620717411303424) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi2))) (-.f64 phi1 phi2))))
(if (<=.f64 phi1 -5548780617371833/1180591620717411303424) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 phi1 1/2))) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 phi2 1/2))) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 1/2 phi1))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 phi1 1/2))) (-.f64 phi1 phi2)))
(if (<=.f64 phi1 -3349999999999999774087296220928874860199250799129965329134612119705572927521376381038467771679111780416512541130434401673859365669423247450105705404125982469609950278645642069342647189284101029888) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2))) (if (<=.f64 phi1 -185000000000000006029072861934708331022274275030485734212396727855767085187366176641796392660728589103967240192) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (-.f64 phi1 phi2))) (if (<=.f64 phi1 -18500000000000000134097772525339259832541909790869438639112192) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2))) (if (<=.f64 phi1 -8762203435012037/576460752303423488) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 lambda2)) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))))))
(if (<=.f64 phi1 -3349999999999999774087296220928874860199250799129965329134612119705572927521376381038467771679111780416512541130434401673859365669423247450105705404125982469609950278645642069342647189284101029888) (*.f64 R (hypot.f64 (*.f64 lambda1 (cos.f64 (*.f64 phi1 1/2))) (-.f64 phi1 phi2))) (if (<=.f64 phi1 -185000000000000006029072861934708331022274275030485734212396727855767085187366176641796392660728589103967240192) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 phi1 1/2)) (neg.f64 lambda2)) (-.f64 phi1 phi2))) (if (<=.f64 phi1 -18500000000000000134097772525339259832541909790869438639112192) (*.f64 R (hypot.f64 (*.f64 lambda1 (cos.f64 (*.f64 phi1 1/2))) (-.f64 phi1 phi2))) (if (<=.f64 phi1 -8762203435012037/576460752303423488) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 phi1 1/2)) (neg.f64 lambda2)) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))))))
(if (<=.f64 phi1 -3349999999999999774087296220928874860199250799129965329134612119705572927521376381038467771679111780416512541130434401673859365669423247450105705404125982469609950278645642069342647189284101029888) (*.f64 R (hypot.f64 (*.f64 lambda1 (cos.f64 (*.f64 phi1 1/2))) (-.f64 phi1 phi2))) (if (<=.f64 phi1 -185000000000000006029072861934708331022274275030485734212396727855767085187366176641796392660728589103967240192) (*.f64 R (hypot.f64 (*.f64 lambda2 (neg.f64 (cos.f64 (*.f64 phi1 1/2)))) (-.f64 phi1 phi2))) (if (<=.f64 phi1 -18500000000000000134097772525339259832541909790869438639112192) (*.f64 R (hypot.f64 (*.f64 lambda1 (cos.f64 (*.f64 phi1 1/2))) (-.f64 phi1 phi2))) (if (<=.f64 phi1 -8762203435012037/576460752303423488) (*.f64 R (hypot.f64 (*.f64 lambda2 (neg.f64 (cos.f64 (*.f64 phi1 1/2)))) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))))))
(if (<=.f64 lambda1 -3399999999999999847169547443142110871605457886817841554782778755707076827600654269467879385080364333954771879135389854227798413944125781943460599622220944361391031088765004664537088) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) lambda1) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(if (<=.f64 lambda1 -3399999999999999847169547443142110871605457886817841554782778755707076827600654269467879385080364333954771879135389854227798413944125781943460599622220944361391031088765004664537088) (*.f64 R (hypot.f64 (*.f64 lambda1 (cos.f64 (*.f64 phi1 1/2))) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(if (<=.f64 lambda1 -170000000000000015117365436236758906864721090453065254165660782059733835675656290421681654237014985558132601465529222876949109316224115689533265450891382110558957613093222376818629321516775877811102998836502883412559325051077912565489725529364065481564275036923250460797792876582928384) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (neg.f64 R)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(if (<=.f64 lambda1 -170000000000000015117365436236758906864721090453065254165660782059733835675656290421681654237014985558132601465529222876949109316224115689533265450891382110558957613093222376818629321516775877811102998836502883412559325051077912565489725529364065481564275036923250460797792876582928384) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (neg.f64 R)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(if (<=.f64 phi1 -23000000000000000) (*.f64 R (-.f64 phi2 phi1)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)))
(*.f64 R (-.f64 phi2 phi1))
(if (<=.f64 phi2 1300000000000000059869580733570580134472701552406580863237149949952) (*.f64 (neg.f64 phi1) R) (*.f64 phi2 R))
(if (<=.f64 phi2 1300000000000000059869580733570580134472701552406580863237149949952) (*.f64 R (neg.f64 phi1)) (*.f64 R phi2))
(*.f64 phi2 R)
(*.f64 R phi2)
Compiler

Compiled 285 to 179 computations (37.2% saved)

soundness144.0ms (0.5%)

Rules
1234×fma-def
1090×distribute-lft-out
940×distribute-lft-in
850×*-commutative
734×associate-+l-
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02047
13847
28647
324347
477947
5325647
6661147
7799147
Stop Event
node limit
Compiler

Compiled 53 to 27 computations (49.1% saved)

end105.0ms (0.4%)

Remove

(sort phi1 phi2)

(sort lambda1 lambda2)

Compiler

Compiled 319 to 162 computations (49.2% saved)

Profiling

Loading profile data...